If you don't always want the value, just use FIRSTKEY/NEXTKEY, like

{
    my $X = tied %maillist;
    my $key = $X->FIRSTKEY;
    while(defined $key ){
         next unless $key =~ /^rubber/;
         ...

         $key = $X->NEXTKEY($key);
    }
}
[download]

See perltie for more.