Anonymous Monk,
How would I print the last element of a loop?

print "$array[-1]\n";    # If you mean last element of array

my $last = keys %hash;
my $counter = 0;
for my $key ( keys %hash ) {
    $counter++;
    print "$hash{$key}\n" if $counter == $last;
}
# If you mean determine if this is last item in loop
[download]

If I run a code and go trough a file and found 5 numbers hor can I print the larger number?

use Scalar::Util 1.10 'looks_like_number';
use List::Util 'max';
my @numbers;
while ( <FILE> ) {
    chomp;
    push @numbers , $_ if looks_like_number( $_ );
}
print max(@numbers), "\n";
[download]

I would highly recommend you take a look at How do I post a question effectively?. You can find it and other helpful information at the PerlMonks FAQ.

Cheers - L~R