#!/usr/bin/perl


open (FILE, "edidocs.csv") or die "Can't open file $!\n";

@lines = <FILE>;

while ($line = pop @lines) {
	print $line "\n";
}