Select Code to Download

open(FIFO), ">$program") || die "Darn : $!"; #will give you a good rea
+son why it can't open. the ">" says, write to this file.
print FIFO "$username\n";
and so on.....