#!/usr/bin/perl
use 5.14.0;
use warnings;
use autodie;

open my $FH, '>', '//npckfs01/users/301058/ZOOG';
print $FH "The quick red fox, etc. etc. etc.\n";
close $FH;