use strict;
use warnings;

my @lines = reverse(<DATA>);