1
2
3
4
5

#!/usr/bin/perl
use strict;
use warnings;
my $data = join '',<STDIN>;
my $bytes = length($data);

Per|li|nist der; -en, -en <zu ↑...ist>: a) Anhänger, Vertreter der radikalen Perlinisten die Perl als die einzig wahre Sprache ansehen; b) Mitglied einer perlinistischen Community.