Help for this page

Select Code to Download


  1. or download this
    @t1 = grep(-e, glob('*1'));
    @t2 = grep(-e, glob('1'));
    @t3 = grep(-e, glob('file2'));
    @t4 = grep(-e, glob('*3'));
    
  2. or download this
    __END__
    $_=q,just perl,,s, , another ,,s,$, hacker,,print;