Help for this page

Select Code to Download


  1. or download this
    @files = grep { ! /^\.\.?$/ } readdir $DIR;