open( IN, "file" );
@lines = <IN>;
close IN;

print reverse @lines;