perl -e "open $fh,'>','perlcreated.txt' or die" && notepad perlcreated.txt