my %hash = ( 
    1 => 'one',
    2 => 'two', 
    3 => 'three',
);

##</code><code>##

my %hash = (
    '1', 'one',
    '2', 'two', 
    '3', 'three',
);

##</code><code>##

my %hash = ( '1', 'one', '2', 'two', '3', 'three' );

##</code><code>##

%hash = split /\W/, $string;