You cannot print a bareword handle. You want to print the line read from the handle, therefore:

print X $_;
[download]