Parent Directory | Revision Log | Patch
revision 589 by dpavlin, Fri Jul 7 21:48:09 2006 UTC | revision 592 by dpavlin, Sun Jul 9 15:22:30 2006 UTC | |
---|---|---|
# | Line 710 Prefix all values with a string | Line 710 Prefix all values with a string |
710 | =cut | =cut |
711 | ||
712 | sub prefix { | sub prefix { |
713 | my $p = shift or die "prefix needs string as first argument"; | my $p = shift or return; |
714 | return map { $p . $_ } grep { defined($_) } @_; | return map { $p . $_ } grep { defined($_) } @_; |
715 | } | } |
716 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |