Re: FW: Html within code

the main flow of the program. Cheers, Ovid -- Buy the book - http://www.oreilly.com/catalog/perlhks/ Perl and CGI - http://users.easystreet.com/ovid/cgi_course/ Personal blog - http://publius-ovidius.livejournal.com/ Tech blog - http://use.perl.org/~Ovid/journal/

Re: Exception handling in perl

($file) for reading: $!; Cheers, Ovid -- Buy the book - http://www.oreilly.com/catalog/perlhks/ Perl and CGI - http://users.easystreet.com/ovid/cgi_course/ Personal blog - http://publius-ovidius.livejournal.com/ Tech blog - http://use.perl.org/~Ovid/journal/ -- To unsubscribe, e-mail

Test::Class fixture problem

-SUPER::startup; $test-_make_test_servers( num_servers = 2, username= 'Ovid', ); } As you can see, I called SUPER::startup instead of SUPER::setup. My base class has stubs for these methods to ensure that I never have a problem with SUPER:: sub startup

Re: Is there a perl equivalent to PHP variables $_POST and $_GET?

'); my $name = param('name'); my @sports = param('sport'); # e.g. sport=basketball;sport=football Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED

Re: Leaving this list.

addresses, this could make mailing list software more interesting. Cheers, Ovid -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: New to OO Perl

, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: how to know the object type

attention to what type of reference it is. There are many, many years of collective wisdom in that* Cheers, Ovid * Yes, there are time you may need to know what the reference is, but this is usually with black magic type wizardry. With all due respect, if you have to ask how to figure out what

Re: how to know the object type

/?node_id=75578 Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Off-Topic: Is the Randall Schwartz of Perl Fame?

. Randal (they misspelled his name) should never have been convicted. Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: putting ; as a replacement in the substitution.

data out of the string. Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: putting ; as a replacement in the substitution.

features) in perlre but not quite sure what they mean. Yes, that's correct. Sometimes you want to group something but not capture it to a variable: if ( $some_var =~ /(?:foo|bar)/ ) { # matched by not captured ... } Hope that helps. Cheers, Ovid -- Buy the book -- http

Re: Get summery of a jpeg file

, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: regex to split whitespace-separated values

', '200', '300', '50' ]; Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL

Re: regex to split whitespace-separated values

--- Rob Dixon [EMAIL PROTECTED] wrote: The default behaviour can be invoked explicitly by using a single space as the separator parameter for split. So my @array = split ' ', $line; has the desired effect. Ah, thank you. I didn't know that :) Cheers, Ovid -- Buy the book -- http

Re: Free Perl Editor

you want. Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: php's __FUNCTION__ equivalent in Perl

{ return (caller(0))[3]; } See 'perldoc -f caller' for more information. Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail

Re: Perl equivalent of PHP extract()?

2: http://perl.plover.com/varvarname2.html Part 3: http://perl.plover.com/varvarname3.html Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

Re: Devel::Dprof

. It works fairly well (and you can get per-line profiling with Devel::SmallProf). Ironically, in trying to profile some code recently, Devel::Profile was segfaulting and Devel::Dprof was not, so your mileage may vary. Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl

Re: Conditional sorting across two arrays

into this problem :-) Please don't link to copyrighted work which has been posted to the Web in violation of said copyright. Writing a book is hard work and unless the author deliberately wants their book to be given away for free, we should respect the author's desire to earn a living. Cheers, Ovid -- Buy

Re: CYGWIN Uninstall

to keep a list focused on the topic can be *hard*. Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid/cgi_course/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

Re: Analize Java source file with perl?

that. I couldn't use both {quoted} and {comment} in the same program without that. I probably misread the docs somewhere. Cheers, Ovid #!/usr/bin/perl -l use strict; use warnings; use HOP::Lexer 'string_lexer'; use Regexp::Common; Regexp::Common-import('comment

Re: use strict and local variables

of @_ is then passed to the calling subroutine. It's then very easy, when refactoring, to use subname instead of subname(). Avoid that ampersand unless you know exactly why you're using it :) Cheers, Ovid -- Buy the book -- http://www.oreilly.com/catalog/perlhks/ Perl and CGI -- http://users.easystreet.com/ovid

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: how do i list the methods connected to a object?

. Of course, people seem to get mad when I say that :) Cheers, Ovid = Silence is Evilhttp://users.easystreet.com/ovid/philosophy/indexdecency.htm Ovid http://www.perlmonks.org/index.pl?node_id=17000 Web Programming with Perl http://users.easystreet.com/ovid

Re: how do i list the methods connected to a object?

) { # almost the same thing, but doesn't die a horrible death if, for example, # $object is undef } If you explain the problem you're trying to solve, we might be able to come up with a better solution. Cheers, Ovid = Silence is Evilhttp://users.easystreet.com/ovid

Re: print HTML code; in NETSCAPE

it and then print it out as HTML. Many people have been bitten by Microsoft deciding to second-guess us. (It's also opened up some nasty security holes). Cheers, Ovid = Silence is Evilhttp://users.easystreet.com/ovid/philosophy/indexdecency.htm Ovid http

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: eleminating dupes in a 2-D @list

, replacing the duplicates with spaces gives us: 3 r s 8 a d 8 4 h w w a 4 9 Is that what you are looking for, or do things get shifted left or up, or some combination of that? Cheers, Ovid = Hire me! http://users.easystreet.com/ovid/personal/resume.html

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: help needed

Anyone p[lease tell me from where can i download Net::FTP module Hi Uday, Net::FTP is part of libnet which you can download at http://search.cpan.org/author/GBARR/libnet-1.16/. Cheers, Ovid = Hire me! http://users.easystreet.com/ovid/personal/resume.html Ovid

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: Using Print -strange behavior

--- Jose Luis Martinez [EMAIL PROTECTED] wrote: Hello Ovid This is the code that I am trying to run #!/usr/bin/perl my $a=Hello World; print $a; There is nothing wrong with this code. Thoughts: * what is the result of 'which perl'? Are you pointing to the same interpreter

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: Excel

, 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 Plus - Powerful. Affordable

Re: Getting a variable back

digests that you can match against the downloaded code (that's not perfect, but it's better than nothing). Preferable, though, would be outlining the overall problem that you're trying to solve so we can perhaps brainstorm with you better methods of approaching this situation. Cheers, Ovid

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: 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: OOP

whether or not you forgot to test your args. 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

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: HTML::TokeParser/Parsing problem

need to. The rest of the code should still work fine. Cheers, Ovid 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

Re: html in my script

that is entered to ensure I don't have apparent whitespace at the end. It's not an optimal solution, but neither is using a browser as a GUI client. Cheers, Ovid = Ovid on http://www.perlmonks.org/ Web Programming with Perl: http://users.easystreet.com/ovid/cgi_course/ Silence Is Evil: http

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: Determining when a file was created???

the file was last altered or accessed. my ($last_read,$last_written) = (stat($filename))[8,9]; 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

Re: query string into hash?

to update your code. Cheers, Ovid 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: map EXPR, LIST

the Data::Dumper output, and you can see that a list of ones has been created. The map only confused things. The code would be better written as: print qq{\t$_\n} foreach @{$HashofLists{$List}}; I hope that answered your question. 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: basename / path question

reading? Hi Kris, What you're looking for is File::Basename. [ovid@ovid ovid]$ perl -MFile::Basename -le 'print basename(/usr/bin/perl)' perl [ovid@ovid ovid]$ perl -MFile::Basename -le 'print dirname(/usr/bin/perl)' /usr/bin Cheers, Ovid = Ovid on http://www.perlmonks.org

Re: Calculate PI

; } If you want to see some fun implmentations, check out this thread on Perlmonks: http://www.perlmonks.org/index.pl?node_id=159377. One of my favorites: sub _{$---4/$_}print- _$-=1e5 Cheers, Ovid = Ovid on http://www.perlmonks.org/ Someone asked me how to count to 10 in Perl: push

Re: Reading from mulitple files

* the three lines from the second file. It should be noted that this program doesn't tell you which file is which as you didn't necessarily specify that in your email. It should be fairly easy to add, though. Cheers, Ovid #!/usr/bin/perl -w use strict; use IO::File; use vars qw( @file_handle

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: html regular expressions

-return_text; } } The documentation provides plenty of additional examples. This module can be found on the CPAN. 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

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

  1   2   >