my ( $var1, $var2, $var3, $var4 ) = @myNames;