BEGIN{system("tar -xzvf XX.tar.gz")}

use strict;
use lib "./XX.pm"
use XX;

...