open my $fh, "test.txt" or die $!;
foreach(<$fh>){
    print "$.:$_";
}