Using system on Windows
#!/usr/bin/perl -w $return_value = system("NOTEPAD"); print "System returned $return_value\n";