Help for this page

Select Code to Download

Select or download this

sub process_file {
    open F, shift;
...
}

recurse_dir ($ARGV[0]);