say [*](map {16-m:g/\,/-!/N/},lines)²