Select Code to Download

#!/usr/bin/perl -w
use strict "vars" ;
...
$data = "testval,1" ;
@splitter = split( "," , $data ) ;
my $$splitter[ 0 ] = $splitter[ 1 ] ;

Can't declare scalar dereference in "my" at srtest line 7, near "$spli
+tter["
syntax error at srtest line 7, near "$splitter["
srtest had compilation errors.