system "rm file2";
open(FILE2, ">", "file2") or die "Opening output failed: $!";

my $file = "file";

if ( -e $file and -s $file ){
    open(MYINPUTFILE, "<", $file) or die "Opening input $file failed: $!";
	while(<MYINPUTFILE>) {
		my($line) = $_;
		chomp($line);
		print FILE2 "$line\n";
		print FILE2 "you need to do this\n";
		print FILE2 " \n";
    }
} else {
	print FILE2 "There is nothing to do\n";
}