all tasks
This commit is contained in:
parent
b83f433714
commit
68f8f3e56b
14735 changed files with 178959 additions and 0 deletions
5
Task/Stack/Perl-6/stack.pl6
Normal file
5
Task/Stack/Perl-6/stack.pl6
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
my @stack; # just a array
|
||||
@stack.push($elem); # add $elem to the end of @stack
|
||||
$elem = @stack.pop; # get the last element back
|
||||
@stack.elems == 0 # true, because the stack is empty
|
||||
not @stack # also true because @stack is false
|
||||
Loading…
Add table
Add a link
Reference in a new issue