Nice!
On Sat, Aug 18, 2012 at 11:05:21AM -0500, Joel Berger wrote:
> ...
> would be easy to implement. Absent that, I hacked out this little
> thing this morning which saves 5 keystrokes.
>
> (see at gist: https://gist.github.com/3379468)
>
> #!/usr/bin/env perl
>
> use strict;
> use warnings;
>
> package PDL;
> use overload '&{}' => sub {
> my $pdl = shift;
> return sub { unshift @_, $pdl; goto &PDL::slice };
> };
>
> package main;
>
> use PDL;
> my $a = xvals(5,5);
> print $a->('(0),');
>
> What do you all think?
>
> Joel
>
> _______________________________________________
> Perldl mailing list
> [email protected]
> http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
--
o
W. Luis Mochán, | tel:(52)(777)329-1734 /<(*)
Instituto de Ciencias Físicas, UNAM | fax:(52)(777)317-5388 `>/ /\
Apdo. Postal 48-3, 62251 | (*)/\/ \
Cuernavaca, Morelos, México | [email protected] /\_/\__/
O< ascii ribbon campaign - stop html mail - www.asciiribbon.org
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
