knoppix@Microknoppix:~$ perl -Mstrict -wE 'my %genus = ();'
knoppix@Microknoppix:~$