Help for this page

Select Code to Download


  1. or download this
    sub parseDir {
        my $self    = shift;
    ...
                ( $_ !~ /^\.+$/ ) and # but avoid . and ..
                ( $self->parseDir( "$path/$_", $out, $target ) ) ), @files
    + );
    }
    
  2. or download this
     
      ( expression ) and ( expression ) and ( expression)
    
  3. or download this
     
      ( ( expression ) and ( expression ) and ( expression) )