open FH, "inputDatafile.txt";

$/=""; ## input field separator
my $line = <FH>;
close (FH);

$count = $line =~ s/(abc)/$1/g;

print "count is : $count\n";