@nums = (57, 113, 25, 76, 712, 13, 3);
	
foreach (sort {$a <=> $b} @nums)	{ 
	
	$larger = $_ 

}

print "The numbers: @nums\n\nlarger=$larger\n";