user
Task

Create a file called   "output.txt",   and place in it the contents of the file   "input.txt",   *via an intermediate variable*.

In other words, your program will demonstrate:

:   :   1. how to read from a file into a variable
        2. how to write a variable's contents into a file

Oneliners that skip the intermediate variable are of secondary interest — operating systems have copy commands for that.
assistant
(formerly Perl 6)

If it is okay to have a temporary copy of the entire file in memory:

**Works with**: Rakudo version 2016.07

```
spurt "output.txt", slurp "input.txt";
```

Otherwise, copying line-by line:

**Works with**: Rakudo version 2015.12

```
my $in = open "input.txt";
my $out = open "output.txt", :w;
for $in.lines -> $line {
    $out.say: $line;
}
$in.close;
$out.close;
```