# run tpage tt.just.pop.pl
# expect no numbers
OUTPUT: [% list = [1, 2, 3] %][% CALL list.pop %]
MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!" | I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README). | ** The third rule of perl club is a statement of fact: pod is sexy. |
| [reply] [d/l] |
[% CALL list.pop %]
or
[% PERL %]
$stash->get('list')->pop;
#or maybe
#pop @{$stash->get('list')};
[% END %]
The latter is untested.
| [reply] [d/l] [select] |
If you enable debugging (DEBUG => 99),
you can see how Template compiles the templates (that
[% CALL list.pop %]
becomes
$stash->get(['list', 0, 'pop', 0]);, and [% list.pop %] becomes $output .= $stash->get(['list', 0, 'pop', 0]);).
MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!" | I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README). | ** The third rule of perl club is a statement of fact: pod is sexy. |
| [reply] [d/l] [select] |
[% list = [1, 2, 3] %]
[% undef = list.pop %]
If it gives you a warning you might have to improvise with something of this like:
[% [undef] = list.pop %]
Evan Carroll www.EvanCarroll.com | [reply] [d/l] [select] |
Thanks to all. These replies are quite helpful. | [reply] |