use strict; use warnings; use Data::Dumper; my %Verbs = do 'cmd_verbs_test.pm'; print Dumper(\%Verbs); __END__ $VAR1 = { 'a' => 1, 'b' => 2 };