Perl – ler dados do teclado

Buenas, esse é um exemplo básico de como ler dados do teclado usando perl, segue exemplo:

#!/usr/bin/perl

# Criado em:Sex 29/Mai/2008 hs 23:26
# Autor: MRSantos mrsantos4@ucs.br

use strict;
use warnings;

print "Entre com seu nome:\n";
my $name = <>;
chomp $name; # retirando a quebra de linha que vem junto

if($name ne '') # vendo se foi digitado algo...
{
	print "Opa, $name\n";
}
else
{
	print "vlw por não digitar nada\n";
}