use strict; #File name: mydata.pl my $res = {# reference variable value..etc}; #### my $another_var = do 'mydata.pl';