RosettaCodeData/Task/Take-notes-on-the-command-line/Raku/take-notes-on-the-command-line.raku
2023-07-01 13:44:08 -04:00

11 lines
177 B
Raku

my $file = 'notes.txt';
multi MAIN() {
print slurp($file);
}
multi MAIN(*@note) {
my $fh = open($file, :a);
$fh.say: DateTime.now, "\n\t", @note;
$fh.close;
}