title: Perl Inline Array Sort (How to avoid 'implicit split' error)
body: <p>I have the following array:</p>
  
  <pre><code>  my @anim = ('rn4,mm8,bosTau2,canFam2,dasNov1,echTel1',
    'rn4,mm8,oryCun1,bosTau2,canFam2,dasNov1,echTel1');
  </code></pre>
  
  <p>It contain multiple strings, each string are comma separated. 
  What I want to do is to sort them based on the greatest members of the string.
  Hence what I tried to do is this:</p>
  
  <pre><code>my @animsort = sort{scalar(split(",",$b)) &lt;=&gt; scalar(split(",",$a))} @anim;
  </code></pre>
  
  <p>But it gives this error:</p>
  
  <pre><code>Use of implicit split to @_ is deprecated at ./scripts/mycode.pl line 35
  </code></pre>
  
  <p>What's the correct way to do it?</p>