Skip to content

Instantly share code, notes, and snippets.

@alcidesfp

alcidesfp/nomedad.pl

Created September 14, 2013 05:22
Show Gist options
  • Save alcidesfp/6559024 to your computer and use it in GitHub Desktop.
Save alcidesfp/6559024 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
nomedad.pl
#!/usr/bin/perl -w
print "Hola ¿Cual es tu nombre?: ";
chomp(my $nombre = readline);
print "¿En que año naciste?: ";
chomp(my $ann = readline);
print "Hola $nombre.\n";
print "En el año 2014 tendrás ", (2014-$ann), " años.\n";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment