#!/user/bin/perl
open(FILE, "Text1.txt");
while(<FILE>){
    print "I saw $_ in Text1.txt\n";
}

close FILE;