> JB1: perl -e "print('?',',?'x (split(',',$ARGV[0])-1));" "a,b,c,d,e,f"
> ?,?,?,?,?,?
>
> P.S. I get this on the latter...
>       Use of implicit split to @_ is deprecated at -e line 1.
>
> When did it become deprecated?

When @_ became the default target for function parameters.

What you have there is kindof odd, actually... you're doing a split and
returning into a list but it's seeing that there is no obvious target,
splitting to @_, and emitting the warning..

what if you removed the () around split()?  It seems extraneous ... and now
that I look at it, you *should* remove the parens and change it to scalar:

perl -e "print join(',', ('?') x scalar split(',',$ARGV[0]);"

HTH!

L8r,
Rob

Reply via email to