#!/usr/bin/perl -w
use strict;
open(R,"textfile"); my @F=<R>; close(R);
pop @F if $F[-1] eq "\n";
print @F;
[download]

PerlMonks graciously bestowed by Tim Vroom.
PerlMonks went on a couple dates, and then decided to shack up with The Perl Foundation.
Beefy Boxes and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.