■標準入力

#!/bin/perl

print "Input your name: ";
$name=<STDIN>;
chomp $name;

if ($name eq "nagai" ) {
	print "Hello $name\n";
} else {
	print "your name is $name.\n";
}

ソースの解説

<STDIN> 標準入力 改行まで入力される
chmop() 最終行の改行を取り払う
if文 if (condtion1) {
...
} elsif (condtion2) {
...
} else {
...
}