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

процедуры


       Как же теперь работают подпрограммы (процедуры, функции) в perl 6? А субрутины работают так.
    
#!/usr/bin/perl6
yellow;
sub yellow {
	"We all live in yellow subroutine".say;
	}
We all live in yellow subroutine

       Bene. Пока ничего неожиданного. А если вызвать субрутину с переменной?
    
#!/usr/bin/perl6
yellow('small');
sub yellow($epit) {
	# my $epit=shift; # теперь так не получается
	"We all live in $epit yellow subroutine".say;
	}
We all live in small yellow subroutine

       Сразу после названия субрутины в скобках мы определяем переменные, которыми "валентна" данная субрутина. Можно определить несколько входных переменных.
    
#!/usr/bin/perl6
yellow('small','sleep');
sub yellow($epit,$act) {
	"We all live and $act in $epit yellow subroutine".say;
	}
We all live and sleep in small yellow subroutine

       Определение входных переменных довольно гибко, там много разных хитростей. Будем пробовать их потом.
# mutatio postrema: 14 Aug 2010

   процедуры, sub      charta situs       nota XIII   

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