Jeff Pang schreef:
> [processing .h files]
> next if $file eq '.' or $file eq '..';
> next if $file !~ /\.h$/;
Those two lines can be replaced by
file =~ /\.h$/ or next;
> return $. if /$string/;
If the string can contain regex-special characters, then always use
quotemeta:
return $. if /\Q$string/;
> 1) Not like C,you can't obtain file pointer in Perl.
You certainly can, see `perldoc -f tell`.
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
