my @lines=<DATA>;
print @lines[0..2,-30..-1];