my $filename = 'c:\Users\a\Desktop\b\c\test_3.v';

open(FH, '<', $filename) or die "Format of bench file name: circuit_name.v \n example : s1423.v\n";

while(<FH>)
{
print "Hello";
}

print "Hello too";

close(FH);