use Config; use warnings; use strict; print $Config{cc}, "\n"; my $obj = tied %Config::Config; $obj->{cc} = 'garbage'; print $Config{cc}, "\n"; __END__ Outputs: gcc garbage