Help for this page

Select Code to Download


  1. or download this
    my @files = grep { -f && /[A-Za-z]{2}_\w{2,5}/ }, 
    readdir $dir;