perl -le 'print for keys ::'