Help for this page

Select Code to Download

Select or download this

use strict;

...
    $count ++;
}
close SFCOMMENTS or die $!;

Select or download this

C:\Projekte>perl -w tmp.pl
Writing 'Line 1
...
Count is: 0
Count is: 1
Count is: 2