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