Help for this page

Select Code to Download


  1. or download this
        my $s=',,,,';
        $nCommas=($s=~/,/g);
    
  2. or download this
        my $s=',,,,';
    
        print $s =~ tr/,//;
    ...
        print $count;
    
        print 0+( ()= $s=~/,/g );