use DBI;
my $dbh=DBI->connect('dbi:CSV(RaiseError=1):');
my $results = $dbh->selectall_arrayref("
    SELECT * FROM file1 NATURAL JOIN file2
");