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

##</code><code>##

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