my @foo = commonkeys($foo, $bar, $splat, $woo, ...);