perl6.suОсвоим perl6 к 2015 году!

$_


       $_ в cheatsheet.txt, который имеется в дистрибутиве ракудо в каталоге docs, называется "current topic".
    
#!/usr/bin/perl6
say "Thema instans: $_";
for 1..7 {
	say "Thema instans: $_"
	}
say "Thema instans: $_"
Thema instans: 
Thema instans: 1
Thema instans: 2
Thema instans: 3
Thema instans: 4
Thema instans: 5
Thema instans: 6
Thema instans: 7
Thema instans: 

       Старая добрая $_...
       $/ содержит результат по регэксу:
    
#!/usr/bin/perl6
my $text='Non est viri timere laborem';
$text ~~ m/\w\w\w\w/;
say "Regex result: $/";
Regex result: viri

       @*ARGS содержит аргументы командной строки:
    
#!/usr/bin/perl6
my $subscript="#!/usr/bin/perl6\n@*ARGS>>.say;";
my $file=open 'subscript.tmp',:w; 
$file.say($subscript);
$file.close;
chmod '0o700','subscript.tmp'; # записали
my $out=run('./subscript.tmp','Это входные данные','и это'); # и вызвали скрипт с аргументами
unlink 'subscript.tmp'; # удалили временный скрипт
и это
Это входные данные

       В хэше %*ENV содержатся переменные окружения:
    
#!/usr/bin/perl6
%*ENV{'LANG'}.say;
%*ENV{'SHELL'}.say;
%*ENV{'TERM'}.say;
ru_RU.UTF-8
/bin/bash
linux

       В массиве @*INC содержатся пути, в которых интерпретатор ищет библиотеки. В скаляре $*PID - номер процесса исполняемого скрипта.
    
#!/usr/bin/perl6
"Process PID: $*PID".say;
Process PID: 15704

       Bene.
# mutatio postrema: 16 Oct 2012

   $_, $/, $!, @*ARGS, @*INC, %*ENV, $*PID, chmod, run, unlink      charta situs       nota CV   

    RSS     stdin@perl6.su    © Alexius Karmanov, 2010-2011