my @useless = map { 1 } qw( this is a silly test );
print "@useless\n";