Re: Problem with my code

"Mumia W." schreef:
Jeff Pang wrote:

[...]
while(my $obj = readdir DIR) {
next if $obj =~ /^\.+$/; #or [...]

More, precisely, you might use this:

next if $obj =~ /\A\.\.?\z/;

Please see `perldoc -f -f`.

--
Affijn, Ruud

"Gewoon is een tijger."
.

Relevant Pages

  • Re: Regexp help please
    ... No, see `perldoc perlsub`. ... "Gewoon is een tijger." ...
    (perl.beginners)
  • Re: Generate random list
    ... perldoc -q random ... (the text about shuffle) ... "Gewoon is een tijger." ...
    (perl.beginners)
  • Re: Escaping a plus sign
    ... perldoc -f quotemeta ... "Gewoon is een tijger." ...
    (perl.beginners)
  • Re: Problem with split
    ... Unless capturing paren's are used, see perldoc -f split. ... "Gewoon is een tijger." ...
    (comp.lang.perl.misc)
  • Re: splitting strings
    ... Because of the capturing, ... See perldoc -f split. ... "Gewoon is een tijger." ...
    (perl.beginners)