use warnings; use strict; use Config; my $obj = tied %Config::Config; print $Config::Config{make}, "\n"; $obj->{make} = "modified_value"; print $Config::Config{make}, "\n"; __END__ outputs: dmake modified_value