sub Pending_HTTP {
    my $file_write = 'Out_Stats.txt';
    ...
}

##</code><code>##

sub Pending_HTTP {
    my ($file_write) = @_;
    ...
}

##</code><code>##

my $outfile = 'Out_Stats.txt';
...
Pending_HTTP($outfile);
Print_File($outfile);