$a,$b,$cの中でカンマに区切られている要素の数でポイントを出したくて
以下のようなコードを書きました。

$total = (split(/,/,$a) * 3)+(split(/,/,$b) * 2)+(split(/,/,$c) * 1);

で、perl -cw すると以下のような警告が出てしまいます。

Use of implicit split to @_ is deprecated at test.pl line xx

どうすればこの警告が出ないようになるのでしょうか?