Help for this page

Select Code to Download


  1. or download this
    use File::Find::ARGV filter=>sub { /\.txt/i };
    while (<>){
    ...
    }