$c = ( () = /\w+/g );

##</code><code>##

 
() = ("head", "tail");
@ar = ( "head", "tail");
($head, $tail) = ( "head", "tail" );

##</code><code>##

($head) = ( "head", "tail" );