ls -lh /path/2024.sql
-rw-r--r--  1 user group  609M Oct 17  20:49 2024.sql

##</code><code>##

open(FH,"/path/2024.sql");
$/=EOF;
$var = <FH>;

&callGenericfunction($var); 

##</code><code>##


use Tie::File;
$filename = "/path/2024.sql";
my $obj = tie @array, "Tie::File", $filename;
$var = join " ",@array;
&callfunction($var); 

##</code><code>##

open (FH, "</path/2024.sql") or die "bah";
binmode FH;

$buffer = 1024 * 1024 * 2;
my $data = "";

while (read (FH,$data, $buffer) ){
       $data .= $data;
}
&callfunction($var);