Die eckigen Klammern sind mehr als flüssig.
"!/^$/" ist doch das gleiche wie "length $_", wahrscheinlich nur performanter, weil ohne Regex.
Und "@y = split /\D+/, $x;" macht es doch auch das gleiche.
Das kann nie aus einem Kochbuch sein. Und wenn doch, nicht aus dem Perl-Kochbuch.