hi,
I am assuming that you want to open a file and print "HI" in that if that is the case
do this way
#!/usr/bin/perl
open HELLO, ">file.txt";
select HELLO;
print HELLO "hi !";