Help for this page
foreach $sourceLine (@SourceData) { if ($functionName =~ /$sourceLine/) {$counter++;} }
$counter = grep (/$functionName/ , @SourceData);