Hola , con esta funcion podran ejecutar word y escribir el texto que quieran, muy util si quieren hacer un virus

#By Doddy H
 
use Win32::Clipboard;
use Win32::GuiTest qw(FindWindowLike SetForegroundWindow SendKeys);
 
sub loadword {
 
system("start winword.exe");
 
sleep 4;
 
SendKeys($_[0]); 
 
}
 

Ejemplo de uso