Re: Including a file with common variables...

, either. It was very frustrating to work on. The system uses some of the features you're asking for help with. Please don't make the same mistakes :) Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course

Re: Multiple .cgi scripts vs. one large script

that much. The don't worry about performance at first concept is one that many programmers balk at, but once you adopt it, it makes life much, much easier. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web

Re: Need help parsing QUERY_STRING_UNESCAPED

were discussed in http://www.perlmonks.org/?node_id=54318. Hopefully that will give you further clues. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid

Re: How to do a static variable that persists from page to page

tampered with } Note that a random secret key can be problematic. Using different secret keys for creating the digest and testing the digest guarantees that the digests will not match. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up

Re: Pointers on security sought for CGI

, Glad you're thinking about security early. Too many folks don't. I have a brief introduction to CGI security at http://users.easystreet.com/ovid/cgi_course/lessons/lesson_three.html. It's not complete, but it covers the basics (there are a lot of things about cookies which I should have covered

Re: checking existance of an item in an array

%safe_destination = ( 'a.htm' = 1, 'b.htm' = 1, 'c.htm' = 1, ); In this case, the values are irrelevant. We're just using a hash as a lookup table. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming

Re: incorporer du php dans une page en perl-cgi ?

; our @var; push @var, hello; push @var, goodbye; my $p = PHP::Interpreter-new; $p-eval(q/ $perl = Perl::getInstance(); function bar() { $value = $perl-getVariable('$main::var[0]'); return $value; } /; print $p-bar(); # should print hello Cheers, Ovid

Re: Taking Multiple Values for The Same Form Field.

, there should be a query string in the entity-body and CGI.pm *should* handle this correctly. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course

Re: Taking Multiple Values for The Same Form Field.

--- Sara [EMAIL PROTECTED] wrote: use CGI; my $q = new CGI; my $name = $q-param('name'); Now What as multiple name values will be coming.?? Use list context: my @names = $q-param('name'); Cheers, Ovid -- If this message is a response to a question on a mailing list

Re: CGI parameters

'); foreach my $name ( param() ) { # assumes single value params print $name: . param($name) . \n; } Which style you prefer will depend upon your needs and tastes. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list

Re: CGI parameters

bytes, you run the risk of exposing you code to a security hole known as the null byte hack. I explain the latter in lesson three of my CGI course: http://users.easystreet.com/ovid/cgi_course/lessons/lesson_three.html Cheers, Ovid -- If this message is a response to a question on a mailing list

Re: $CGI::DISABLE_UPLOADS

this, you'll want to look into mod_perl or some other technology which allows Perl to have access to the full server request cycle. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http

Re: New Website for Perl Beginners: perlmeme.org

of addressing the many irrational anti-Perl memes, it really needs to get things right. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course

Re: How big is too big?

a bit. Quality goes up because I discovered that code which is easy to test is generally better code. Productivity has gone up because developing higher quality code and constantly refactoring means that my code base is much easier to work with. I'm rarely hacking around problems. Cheers, Ovid

Re: How big is too big?

--- Tony Frasketi [EMAIL PROTECTED] wrote: Thank a lot Ovid Your explanation enlightened me to the existance of the variousTest modules... You're quite welcome. Test::Unit http://search.cpan.org/perldoc/Test::Unit is an interesting XUnit-style testing library. I wouldn't use

Re: Yet another package problem

to ask. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

RE: Use of uninitialized value

'; } print bar(); } print bar(); If you really need lexically scoped subroutines, assign an anonymous subroutine to a scalar: sub foo { my $bar = sub { return 'bar'; }; print $bar-(); } # no access to $bar from here Cheers, Ovid -- If this message is a response to a question

Re: CGI.PM and IF statment....

and write the condition like this: if ($mt) { ... } Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL

Re: Exact matching using GREP.

from array for 'php' if the $row-{CAT_TITLE} is 'php' it prints php/counters, php/forums and every element containing php. Assuming I understood your question correctly: if (grep { $_ eq $row-{CAT_TITLE} } @present) { # do something } Cheers, Ovid -- If this message is a response

Re: count how many tags

/a /body And the output: list_o0 list_no1 title1 ltl_title3 paragraph1 link1 Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http

Re: count how many tags

--- Ovid [EMAIL PROTECTED] wrote: First, I would suggest that you're trying to count two different things, tags and attributes. You may wish to separate them. The following code will do what you want. It uses the HTML::TokeParser::Simple module to make this relatively easy to read. I

Re: upload question

FILEHANDLE,SCALAR,LENGTH Attempts to read LENGTH characters of data into variable SCALAR from the specified FILEHANDLE. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http

Re: getstore and comments

may wish to read my CGI Course at http://users.easystreet.com/ovid/cgi_course/ I cover similar issues and I also discuss the values of taint checking. Hope this helps! Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web

Re: htaccess question

event, when using .htaccess, I would strongly recommend using it over a secure connection. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course

RE: How to grep out contnts of a column

, but there are numerous on the CPAN. Which module should I download next? Filter::Util::Call is in Filter: http://search.cpan.org/dist/Filter/ Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http

Re: HTML::Templates

state in a local session and give them a cookie with the session key? Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail

Re: Just to know why ?: is not working here

Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED

Re: Hash array

} }; # missing a curly Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: Variables in Modules

and, if it ever gets set to a bad value, you have only one place to put your debugging code. Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course

Re: Errors while inserting into long data type

is that a potential security hole if done incorrectly, but I believe some DBD's will choke if $some_var is too large. Try using a bind variable and see if that avoids the problem: my $sth = $dbh-prepare(INSERT INTO TABLE (name) VALUES (?)); $sth-execute($some_var); Cheers, Ovid --- Mallik

Re: Calling subroutines

{ # die or go to a default page } Solutions like this is generally easy to understand (particular when using named actions). Cheers, Ovid -- If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http

Re: Challenge (for me, at least)

( $device = STDIN ) if ! $device; That would be tougher, but I wouldn't squeeze all of that onto one line because after a bit, readability suffers. Also, if you have a CGI script, just what are you expecting to read from STDIN in that third line? :) Cheers, Ovid = If this message is a response

Re: Favorite Perl CGI Framework for Web Site Development?

it. There's also OpenInteract (http://www.openinteract.org/). I know nothing about it, but it's been around for a while so presumably (?) it's stable and well-tested. Cheers, Ovid = If this message is a response to a question on a mailing list, please send follow up questions to the list. Web

Re: Generating a hierarchy path

://www.unixwiz.net/techtips/sql-injection.html). I've converted the code to use bind values to prevent this security problem. See perldoc DBI and read the section entitled Placeholders and Bind Values. Cheers, Ovid sub pathmenu { my ($dbh, $page_hash, $mutterid, $page_type) = @_; my ($muttertype) = $dbh

Re: perl-CGI module - post method

'})) { print $buffer; } else { print Could not read STDIN; } } else { print Don't know how to handle '$ENV{REQUEST_METHOD'; } I have more information about this at Lesson 2 (http://users.easystreet.com/ovid/cgi_course/lessons/lesson_two.html) of my course. Cheers, Ovid

Re: print $q-p(with CSS)

information. Cheers, Ovid = Silence is Evil http://users.easystreet.com/ovid/philosophy/decency.html Ovid http://www.perlmonks.org/index.pl?node_id=17000 Web Programming with Perl http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL

Re: Read Write to file .. need help

.html) Cheers, Ovid = Silence is Evil http://users.easystreet.com/ovid/philosophy/decency.html Ovid http://www.perlmonks.org/index.pl?node_id=17000 Web Programming with Perl http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL

RE: Use Strict

into a proper module and using Exporter. References: perldoc -f my perldoc -f package perldoc perlmod perldoc Exporter Cheers, Ovid = Silence is Evil http://users.easystreet.com/ovid/philosophy/decency.html Ovid http://www.perlmonks.org/index.pl?node_id=17000

Re: Why executable?

of this hole. Cheers, Ovid --- fliptop [EMAIL PROTECTED] wrote: On Mon, 11 Aug 2003 at 22:36, Octavian Rasnita opined: [snip] OR:I've tried chmodding the perl script to 755, and I've tried running it OR:with: OR: OR:$ script.pl OR: OR:...but it didn't want to run, telling me

Re: MVC - the 'meme drift'

thoughts, go read Dominus' presentation on the topic (http://perl.plover.com/yak/design/). I, however, am pretty much done here. I have work to do :) Cheers, Ovid = Silence is Evilhttp://users.easystreet.com/ovid/philosophy/indexdecency.htm Ovid http

Re: return(bless $rant, $class) || Fwd: PHP vs Perl

--- drieux [EMAIL PROTECTED] wrote: Ovid, I love the smell of 'primate-ism' It could be merely the way that you are presenting the problem - and a desire to defend an anachronistic model of MVC, based upon the underlying 'primate-ism', and the scary thought of 'recursion

RE: Getting the domain name

could toss out that cause issues here. Cheers, Ovid = Hire me! http://users.easystreet.com/ovid/personal/resume.html Silence is Evilhttp://users.easystreet.com/ovid/philosophy/indexdecency.htm Ovid http://www.perlmonks.org/index.pl?node_id=17000

Re: Why not Class Objects

to be able to override this. Class::Data::Inheritable allows you to do that. Cheers, Ovid = Hire me! http://users.easystreet.com/ovid/personal/resume.html Ovid http://www.perlmonks.org/index.pl?node_id=17000 Web Programming with Perl http

Re: Premature end of script headers

significantly different from the other one. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence Is Evil: http://users.easystreet.com/ovid/philosophy/decency.txt __ Do you Yahoo

Re: Premature end of script headers

; $FORM{$name} = $value; } Numerous bugs here. Rather than go through all of them, I'll just post a link to my course where I detail them: http://users.easystreet.com/ovid/cgi_course/lesson_two/lesson_two.html # where is the mail program? $mailprog = 'usr/lib/sendmail'; Without

Re: directory help

::Find' for more information. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence Is Evil: http://users.easystreet.com/ovid/philosophy/decency.txt __ Do you Yahoo!? Yahoo

Re: image upload

(:standard); my $fh = param('upload_form_name'); print while $fh; The documentation will give you far more detail on how to handle this. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence Is Evil: http

Re: image upload

should check out the CGI.pm documentation (http://users.easystreet.com/ovid/cgi_course/appendices/appendix3.html#creating%20a%20file%20upload%20field). 'cgi-lib.pl' has been deprecated for years. The following snippet should give you a start. If you are on a Windows system, you'll also want

Re: image upload

--- Ovid [EMAIL PROTECTED] wrote: you are on a Windows system, you'll also want to see 'perldoc -f binmore' Erm, I meant 'perldoc -f binmode' :) Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence Is Evil: http

Re: Guestbook script problem

also use your CGI object for this: print $q-header; See my CGI course for more information on this (link at bottom of email). Good luck with your programming! Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence

Re: Re: tutorials

incarnations of the site). Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence Is Evil: http://users.easystreet.com/ovid/philosophy/decency.txt __ Do you Yahoo!? Yahoo! Mail

Re: tutorials

it without understanding the implications, but code like this should not be used except as an example of why it doesn't work. You can find more detail at lesson two of my CGI course: http://users.easystreet.com/ovid/cgi_course/lesson_two/lesson_two.html The rest of the course has many similar issues

Re: tutorials

also check out http://users.easystreet.com/ovid/cgi_course I assume that you already know Perl and know *some* HTML, but that's about it. I think it's fairly easy to read and has gotten some good reviews. Let me know what you think. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web

Re: How can I solve this error?

help messages to CLPM, Perlmonks, or other resources in an effort to find a PPM. It would be much easier that way. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift

Re: perl/DBI error

will always be reported so you don't have to worry as much about always checking the return value of all DBI calls. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift

Re: How can I solve this error?

hope it won't be necessary to install a full C compiler. Teddy, Hate to break it to you, but cl.exe is the name of Microsoft's C/C++ compiler :) Cheers, Ovid = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q

Re: How can I solve this error?

Hmmm... I just answered a four day old email message, didn't I? :) Cheers, Ovid (who never did Y2K work because he obviously can't find a date) --- Ovid [EMAIL PROTECTED] wrote: --- Octavian Rasnita [EMAIL PROTECTED] wrote: Hi all, When trying to compile a module using the nmake program

Re: CGI.pm param question

fields necessary to contain your form values. Here's a two-line demonstration: use CGI qw/:standard/; print hidden( $_ ) foreach param(); Save that as 'test.pl' and run it as follows: perl test.pl color=red color=green name=Ovid You should get output similar to the following (I've

Re: Mystery number 1 in output

print Ovid' That prints Ovid1 Cheers, Ovid = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

RE: Redirect and cookies

must begin with nph-. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

Re: Redirect and cookies

, and 5.0 where you cannot set a cookie and do a redirect at the same time unless you switch to non-parsed header scripts. http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q176113 Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push

Re: Checking Form data

: Client-side validation (javascript) is fine for avoiding an unnecessary trip to the server, but it's easily avoided -- you can just turn javascript off. Therefore, server-side validation is mandatory lest you open up security holes. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org

Re: HTML tags - module

( $token-is_start_tag( 'body' ) ); while ( my $token = $p-get_token ) { next unless $token-is_text; # skip non-visible stuff print $token-return_text; } Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse

Re: Form.pm (next installment of code review)

that way. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

Re: Form.pm

ContentType: text/plain\n\n; print Set-Cookie: name=Ovid; expires=Friday,31-Dec-02 23:59:59 GMT; domain=ovidinexile.com;\n; Every one of those three lines has an error. Some of them, the browser (or perhaps the Web server) will correct for. Others will not be corrected. Further, many

Re: Form.pm

an old version of CGI.pm. From later versions (this pulled from 2.74): my(@pairs) = split(/[;]/,$tosplit); Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift

Re: Username Password Question

reading, your split is acting like some weird chomp. As for your actual, question, I'm going to sidestep it (as others have answered already) and suggest that you read http://www.easystreet.com/~ovid/cgi_course/lesson_four/lesson_four_2.html. There are some issues with your code that are covered

Re: Form.pm

me a url where I could see an example. split(/[;]/,$tosplit); Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print

Re: 2 Questions

is the last results of the last expression evaluated, in this case, a hash reference. Be careful with this technique, though. If someone else can alter the contents of 'test.dat', you could be eval'ing unsafe code. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how

Re: Form.pm

through the code and I see a few things that warrant attention. I'll comment later when I have a bit more time. I do have to say, though, that despite some obvious issues, this is some of the nicest hand-rolled CGI parsing code that I have seen. Cheers, Curtis Ovid Poe = Ovid on http

Re: CGI.pm v/s roll-your-own [WAS:] Displaying Problems

a reminder regarding posting your alternative to CGI.pm (and thanks to niko for reminding me to remind you :) Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift

Re: Fwd: passing variables in POST

, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse @A __ Do

Re: passing variables in POST

handles that. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

Re: Fwd: passing variables in POST

--- Niko Gunadi [EMAIL PROTECTED] wrote: thanks very much Ovid, it was very nice of you, but can you complete your favour and describe how to implement Apache::Session, i mean, whats the use of that module if i could generate a session id with md5? you actually can use CGI::Session

Re: Can someone tell me what I did wrong with this?

() would only return the first sport selected. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

Re: test.cgi hashing error

/a}\n}; } Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

Re: security check

really need security, you will need to have some sort of authorization to accomplish this (such as a username/password combination). Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c

Re: Can someone tell me what I did wrong with this?

, but rather than my try to pack it into an email, check out my CGI course at http://www.easytstreet.com/~ovid/cgi_course/ Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split

Re: GET/POST handleing

) { read(STDIN, $formInfo, $ENV{CONTENT_LENGTH}); } [snip] Chris, By the time you finish reading http://www.easystreet.com/~ovid/cgi_course/lesson_two/lesson_two.html, you will be able to identify numerous bugs in this code. I know it's a popular way to parse form data, but popular

Re: Can someone tell me what I did wrong with this?

it saves on typing :) What is the content variable doing? I just put that in so that I could assign data to it and print it in the middle of the HTML document. Otherwise, you'd have to repeat the HTML for each 'if' conditional. Other than that I think I get it. Great :) Cheers, Curtis Ovid Poe

Re: Can someone tell me what I did wrong with this?

it saves on typing :) What is the content variable doing? I just put that in so that I could assign data to it and print it in the middle of the HTML document. Otherwise, you'd have to repeat the HTML for each 'if' conditional. Other than that I think I get it. Great :) Cheers, Curtis Ovid Poe

Re: CGI.pm

the next month I think, look for it there. It will be called Form.pm written by David Hicken. David David, That sounds good. It would be nice to see robust, well-written alternatives to CGI.pm. Any chance you can submit it for peer review? Cheers, Curtis Ovid Poe = Ovid on http

Re: Uploading Help

; print FILE $file; $file_count++; } close FILE or die $!; } return $file_count; } Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n

Re: Uploading Help

that you failed to open since I messed up the scope. Sorry 'bout that! Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q

Re: file uploading

'}; to get the content type, if you wish to restrict them. This, of course, is a convenience feature and not really a security feature as this is easily spoofed. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e

Re: webBotting a Job Hunt

idea. Just be sure to be a good netizen and follow the Terms of Service that each site provides. Many sites (though I am not sure about the job sites) request that you do not use automated tools to access them (tools such as LWP, mirroring programs, etc). Cheers, Curtis Ovid Poe = Ovid

Re: First and second rate programmers

to retain this feature. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse

Re: URL for security issue?

it please do so again, or maybe just email it to me privately? Thanks! - John I'm not sure as to the link, but you can check out my course at http://www.easystreet.com/~ovid/cgi_course/ I focus heavily on security issues and include many links to better resources. My course deals heavily

Re: Verifying the CONTENT_LENGTH

and Windows 2000, I am sure that *many* people would want to know. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print

RE: Opening Filehandles under taint check

--- Camilo Gonzalez [EMAIL PROTECTED] wrote: Ovid, You're a god (or at least an erotic poet from Ancient Rome). That worked perfectly. I feel like such an idiot. Thanks for pointing out the obvious. Camilo, Heh :) At least *some* people appreciate the name Ovid. Don't feel like an idiot

Re: Opening Filehandles under taint check

problem should be solved. Cheers, Curtis Ovid Poe = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//; shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse