"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." -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
