Ici apprendre mon chemin autour de Raku (né Perl 6), très agréable tout autour. Mais la magie me manque cruellement <>
de Perl 5, où vous pouvez simplement:
my $x = <>;
print $x;
while(<>) {
print join(':', split);
}
(lire la ligne d'entrée suivante dans $x
, boucle sur le reste; l'entrée provient des fichiers nommés comme entrée ou entrée standard si aucun fichier n'est fourni). Les tutoriels "Perl 5 à 6"/guides de migration/... ne parlent que de Slurp
ing le fichier entier, ou open
ing des fichiers individuels par nom. Aucune magie "prendre l'entrée des fichiers nommés dans l'ordre" je peux trouver.
Je veux récupérer la magie!
Assez de magie pour vous?
sub MAIN( Str $file where *.IO.f )
{
.say for $file.IO.lines.map: *.comb.join(':');
}