my( $foo, $bar ) = @_;

##</code><code>##

( $a, $b ) = split(';',$abc, 2);