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;