I'm not quite sure why you're using the 'reverse' word above, unless you want to print the lines of the file in reverse order.

Here's yet another way of doing the same thing:

#!/usr/bin/perl

use strict;
use File::Copy;

print STDOUT "Content-type: text/plain\n\n";

copy('yourfile.txt', \*STDOUT);
[download]

(Untested as always...)