Select Code to Download

die "Unknown char! \n" unless exists $testHash{$_} for (@test);

die "Unknown char! \n" unless grep { exists $testHash{$_} } @test;