C:\>perl -Mstrict -e "my %hash; print 'yes' if $hash{key}"

C:\>