Help for this page
#!/usr/bin/perl -w ... } return($line_cnt); }
Before call: old value 29 lines read after call: old value