$variable=*FILEHANDLE;
print $variable "things to be printed\n";