Horas y Minutos
1234567891011121314151617181920
use strict;
use warnings;
print "\n---------------Horas Y Minutos---------------\n";
print "Cuantos minutos quieres convertir a horas? \n";
my $minutos = <STDIN>;
print "\n";
if($minutos == 60){
print "1 Hora";
} elsif($minutos > 60) {
my $total = ($minutos / 60);
print "$total horas";
} else{
print "$minutos minutos";
}
exit;
Perl
INFO