#!/usr/bin/perl -w
use strict;
use diagnostics;

print "Ohne Perl-Pufferung:";
$| = 1;
print "Hallo";
sleep 5;
print ", Escape ist ein Quatschkopf";

print "Und jetzt mit Perl-Pufferung:";
$| = 0;
print "Hallo";
sleep 5;
print ", Escape ist ein Quatschkopf";