#!/usr/bin/env perl -w

use 5.12.0;

open my $fh, '>', 'test.tmp' or die "Cannot open test.tmp: $!\n";
say $fh $_ for @ARGV;
