$y = require "/tmp/bla.pl";
use Data::Dumper; warn Dumper($y);