use strict;
use warnings;

my %foo = (
  "GENERATE" => "10 14 00 07 4d",
  "DELIVER"  => "16 75 32 14 77"
);

$foo{CREATE} = \$foo{GENERATE};
$foo{DELIV} = \$foo{DELIVER};

use Data::Dumper;
print Dumper \%foo;


##</code><code>##

print ${ $foo{CREATE} }, $/;

##</code><code>##

$foo{CREATE} = $foo{GENERATE};
$foo{DELIV} = $foo{DELIVER};