print THEOTHERSCRIPT "print qw($userinput"; ),"\n";