Игнорирование регистра.

Игнорирование регистра /образец/i.

print "any last request? "; if(<STDIN&gt =~ /^y/i) { ... }