my %dict = ( 'brown' => 'yellow', qr/int(\d+)/ => 'int', qr/float(\d+)/ => 'float', ); #### $VAR1 = { '(?-xism:int(\\d+))' => 'int', 'brown' => 'yellow', '(?-xism:float(\\d+))' => 'float' }; #### my %dict = ( 'brown' => 'yellow', 'int\(\d+\)' => 'int', 'float\(\d+\)' => 'float', );