【ノートン】インターネットセキュリティ Ver.18【2003】

このエントリーをはてなブックマークに追加
279もいもい
おしえて

以下に記すPerlのサブルーチンayayaに、
a0YaAya56m1a23yaiay5Aka4ya0Ay1AiaY2ata00yata4Yay
このような文字列を引数として渡すとその戻り値は何になるか。


$pass = &ayaya('a0YaAya56m1a23yaiay5Aka4ya0Ay1AiaY2ata00yata4Yay');

sub ayaya{
$string = @_[0];
$string =~ s/\d+//g;
$string =~ s/aya//ig;
return $string;
}