Perl

We'll write more about Perl after we decipher the following code:

perl -wlne'END{print$n}eof&&$n++;/ ([^<]+)/i&&$n--' *

Interpretation
The code in question (from the collection "The road to Perligata") is a lament over the coming apocalypse, an expression of the author's Weltschmerz and the futility of all human endeavors. Let us take it step by step:

In Perl
eval join '', <>;

In shell scripts
perl