use Fcntl;
sysopen my $fh => "/path/to/file", O_RDONLY | O_CREAT, 0666 or die;
[download]

Abigail