eval "&\$sub( " . join( ", ", map "\$_[$_][0]", 0..$#_ ) . " )"