#!perl -lap
$_="@{$L[@L]=[(map$$_[@L],@L),@F]}"