Think about Loose Coupling | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
hi!
your main problem seems to be that the code in the while loop doesn't get executed: ($file == "." || "..") is not the same as ($file eq "." || $file eq ".."), as the string constant </code>".."</code> evaluates true all the time and the whole expression is true. you have to use eq if you compare strings, == is the operator to compare numerical values! always use the -w option in the shebang line (/path/to/perl -w) or use warnings; to to enable warnings, to notice nasty litte bugs! Change that line in your code to something like this: hope to help, snowcrash ////// In reply to Re: CGI Directory Lister
by snowcrash
|
|