print $code->[0];