s/(.*)/ $1\n/ for @small_files; #### Warning: Use of "-s" without parentheses is ambiguous Unterminated <> operator #### my @small_files = grep -s $_ < 10_000, @ARGV;