Horas_minutos
12345678910111213141516171819202122
use warnings;
use strict;
print "¿Cuántos minutos quieres convertir a horas? \n";
my $minutos = <STDIN>;
if($minutos == 60) {
print "1 Hora";
}elsif ($minutos > 60) {
my $total = ($minutos / 60);
print "$total Horas";
}else{
print "$minutos Minutos";
}
exit
Perl
INFO