Sorry, forgot to attach it.
On Fri, 2 Aug 2002 12:18:54 UT, "Kyle Babich" <[EMAIL PROTECTED]> said:
> My error log is giving me this:
> [Fri Aug 2 07:02:39 2002] [error] [client 63.208.116.140] Premature
> end of script headers:
> /home/sites/kmb/www/public_html/
My error log is giving me this:
[Fri Aug 2 07:02:39 2002] [error] [client 63.208.116.140] Premature
end of script headers:
/home/sites/kmb/www/public_html/njindenial/index.pl
syntax error at /home/sites/kmb/www/public_html/njindenial/index.pl
line 20, near "my "
Global symbol "$con" requires expl
My error log is giving me this:
[Fri Aug 2 07:02:39 2002] [error] [client 63.208.116.140] Premature
end of script headers:
/home/sites/kmb/www/public_html/njindenial/index.pl
syntax error at /home/sites/kmb/www/public_html/njindenial/index.pl
line 20, near "my "
Global symbol "$con" requires expl
What do you mean empty? I tried it, it works. When I open the file it
adds the 1 as the last character of the file. So when I chop it the 1
gets deleted.
On Thu, 1 Aug 2002 18:00:36 -0400, "David T-G"
<[EMAIL PROTECTED]> said:
> Kyle --
>
> ...and then Kyle Babich s
gt; said:
> Kyle --
>
> ...and then Kyle Babich said...
> %
> % I wrote the attached script not realizing that when I open() files it
> % would return the 1 when it was sucessful. How would I open a file
>
> Yep.
>
>
> % without the 1, or anything else besides the content o
Nevermind, I spoke to soon. I just "chop()"ed the 1 off to fix it.
On Thu, 1 Aug 2002 21:30:49 UT, "Kyle Babich" <[EMAIL PROTECTED]> said:
> I wrote the attached script not realizing that when I open() files it
> would return the 1 when it was sucessful. How wou
I wrote the attached script not realizing that when I open() files it
would return the 1 when it was sucessful. How would I open a file
without the 1, or anything else besides the content of the file, being
returned?
Thank you,
--
Kyle
index.pl
Description: Perl program
--
To unsubscribe, e
am pretty new to Perl myself, but you might want to try
> something
> like this:
>
> $q = new CGI;
> my $con = $q->param('con');
>
> Soheil
>
>
>
> -Original Message-
> From: Kyle Babich [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday
This is what shows in my error log:
Undefined subroutine &main::param called at
/home/sites/kmb/www/public_html/njindenial/index.pl line 10.
This is like 10:
my $con = param( "con" );
What should I change? I'm not quite sure what I should do.
(I have attached the entire script if you think it i
How do I flock(); with strict subs in effect?
Thanks,
--
Kyle
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Sorry for bothering everyone again, but could someone tell me what to change
so that I can import variables from external files and get them to work in
the current file? (see original message)
Thank you,
Kyle
- Original Message -
From: "Kyle Babich" <[EMAIL PROTECTED]
I'm trying to import scalars from an external file (fried.dat) and print
them in the current file (index.pl).
- Original Message -
From: "Nikola Janceski" <[EMAIL PROTECTED]>
To: "'Kyle Babich'" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
print Dumper $hash_ref;
print <<"EndOfHTML";
our($name); chicken
EndOfHTML
fried.dat:
{
name => 'fried'
}
- Original Message -----
From: "Nikola Janceski" <[EMAIL PROTECTED]>
To: "'Kyle Babich'" <[EMAIL PROTECTED]>; <[
en
fried.txt\n";
print Dumper $hash_ref;
print <<"EndOfHTML";
$name chicken
EndOfHTML
And here is what I have in fried.dat
{
name => 'fried'
}
I have both chmod'd to 755. What is wrong with it?
On Tue, 2 Jul 2002 17:16:00 -0700 (PDT),
How can I import scalars, arrays, etc. from external perl and text
files?
This is what I have in index.pl:
#!/usr/local/bin/perl -wT
use strict;
use CGI qw/ :standard /;
print header ( 'text/html' );
open(TEXT,") {
print;
}
close(TEXT) or die("error: fried.txt failed\n
27;t know what I would do without this list. :)
On 1 Jul 2002 15:36:19 -, "Felix Geerinckx"
<[EMAIL PROTECTED]> said:
> on Mon, 01 Jul 2002 15:22:00 GMT, [EMAIL PROTECTED] (Kyle Babich) wrote:
>
> > open(text,"text.txt") or die ("error: text.txt
open(text,"text.txt") or die ("error: text.txt failed\n"); #line
17
while()
{
print $_;
}
close(text) or die("error: close text.txt failed\n"); #line
22
bash-2.05$ perl -Tcw index.pl
Unquoted string "text" may clash
How is that done where there is no filename included in the url, just
the directory and then the variables?
Thanks in advance.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
xec
> CGI
> (execute CGI).
>
> Here's a link I just grabbed from Google, there are plenty of
> references out
> there though...
>
> http://www.webcom.com/~webcom/help/inc/include.shtml
>
> Jimmy James
>
>
>
> Kyle Babich wrote:
>
> > What would I
What would I use to include external pages in my script? (like if I wanted
to print the contents of faq.txt or log.cgi in my script)
Is there a way to do the above except to include a php script instead of a
txt file and have both the cgi and php function correctly?
Thank you,
Kyle
--
To uns
$content2 = qq{ \n};
} elsif ($c2 eq "c") {
$content2 = qq{ \n};
} elsif ($c2 eq "su") {
$content2 = qq{ \n};
} elsif ($c2 eq "hd") {
$content2 = include{"helpdesk/support.cgi"};
} else {print "error: content2 failed\n";}
- Original
Why is this invalid and how do I make this valid while using strict subs?
} elsif ($c2 eq "hd") {
$content2 = include{helpdesk/support.cgi};
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Actually I do have the content-type printed:
#!/usr/bin/perl -wT
use strict;
use CGI qw/ :standard /;
$CGI::DISABLE_UPLOADS = 1;
$CGI::POST_MAX = 512 * 1024;
print "Content-type: text/html\n\n";
I attached the entire script to this message.
- Original Message -
From: "Hanson, Robert" <
Ok, I did like perldoc cgi said and changed it to this:
print start_html(
-title => "IMAP.cc",
-head => Link(
{
-rel => "stylesheet",
-type => "text/css",
-href => "style.css",
}
),
-bgcolor => "\#FF"
),
It still won't
When I load this in the browser I just get a blank page. The source
shows declaration, html, body, head, and meta tags, but that's it.
What should I change?
#!/usr/bin/perl -wT
use strict;
use CGI::Pretty qw/ :standard /;
$CGI::DISABLE_UPLOADS = 1;
$CGI::POST_MAX = 512 * 1024;
print header (
For the following the syntax is correct but when I try to open it
nothing displays, what should I change?
#!/usr/bin/perl -wT
use strict;
use CGI::Pretty qw/ :standard /;
$CGI::DISABLE_UPLOADS = 1;
$CGI::POST_MAX = 512 * 1024;
print header ( "text/html" );
my $date = localtime;
my $c = param(
l --
>
> ...and then Kyle Babich said...
> %
> % This is what I have:
> %
> % my %pages = ("Yahoo","http://www.yahoo.com/";,
> % "Google", "http://www.google.com/";,
> % "All The Web", "http://w
}
How could I put this all into a scalar to call up later?
Thank you,
Kyle
>
> --- Kyle Babich <[EMAIL PROTECTED]> wrote:
> > Ok, I've got it down to one problem right now, I need an explicit
> > package name for this:
> > foreach $key(keys %pages) {
> >
Yes, I am using IE 6.0.2600.IC, but it was redundant too and showed
up when I loaded the page so I deleted the print header; after I wrote
that e-mail.
> --- Kyle Babich <[EMAIL PROTECTED]> wrote:
> > Ok, what you put didn't work for me for some reason. I was gett
my go?
>
>
> Kyle --
>
> ...and then Kyle Babich said...
> %
> % Ok, I decided to make my test.cgi into a kind of refernce page for
when
> % I'm creating my site. There is some kind of problem with my hash.
> % Once again can someone explain to me what I'm do
Ok, I decided to make my test.cgi into a kind of refernce page for when
I'm creating my site. There is some kind of problem with my hash.
Once again can someone explain to me what I'm doing wrong?
Here is what I got from doing perl -Tcw in the shell:
> bash-2.05$ perl -Tcw test.cgi
> bash-2.0
ut Me Content;
} elsif ($nav eq "def") {
$nav2 = qq{Yahoo};
}
print <<"EndOfHTML";
Some CGI test
CGI Test
$content
$nav2
EndOfHTML
> --- Kyle Babich <[EMAIL PROTECTED]> wrote:
> > I'm a beginner. The following is what
ltime;
my $body = param('body');
my $content = "body";
if ($body eq "yahoo") {
$content = qq{http://www.yahoo.com/";>Yahoo\n};
} elsif ($body eq "date") {
$content = $date;
}
print <<"EndOfHTML";
Some CGI test
CGI Test
Ok, a few questions:
What does print <<"END_HTML"; do as apposed to < --- Kyle Babich <[EMAIL PROTECTED]> wrote:
> > I'm a beginner. The following is what I wrote:
> >
> > #!/usr/bin/perl
> > print "Content-type:text/html\n\n";
>
ot be run.
>
>
> - Original Message -----
> From: "Kyle Babich" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Saturday, June 22, 2002 8:52 PM
> Subject: Can someone tell me what I did wrong with this?
>
>
> I'm a beginner. The foll
Yes, I have the CGI module.
What should I put into the script?
> Kyle,
> Do you have the CGI module available? You need to parse the 'get'
> parameters and with CGI it's really easy.
> David
>
> -----Original Message-
> From: Kyle Babich [mailto
I'm a beginner. The following is what I wrote:
#!/usr/bin/perl
print "Content-type:text/html\n\n";
@days = ("Sunday","Monday","Tuesday","Wednesday","Thursday",
"Friday","Saturday");
@months = ("January","February","March","April","May","June",
"July","August","Septembe
37 matches
Mail list logo
