Generally, Perl is designed to accomplish easy tasks in very few lines of code. For example, in a UNIX-ey type of environment, this code emulates the cat utility, assuming you redirect the input.
====
#! /usr/local/bin/perl
while(<>) {
print;
}
====
For active web content, there are reasons...