Help for this page

Select Code to Download


  1. or download this
    my @files = grep {!/pattern_I_want_to_ignore/} `ls`;
    
  2. or download this
    use autodie;
    opendir my $dir, ".";
    my @files = grep {!/pattern_I_want_to_ignore/}
                sort grep {!/^\./} # simulate ls
                readdir $dir;