> 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