in reply to Re: count lines, bottom to topin thread count lines, bottom to top
#!/usr/bin/perl -w use strict; use warnings; my @array1 = (1, 2, 3, 4, 5); my @array2 = reverse( @array1 ); print join(", ", @array1), "\n"; print join(", ", @array2), "\n"; exit; [download]