% perl jan99.pl 
Hallo Jan
% cat jan99.txt 
Hallo Jan
% perl jan99.pl
Hallo Jan
% cat jan99.txt
Hallo Jan
Hallo Jan
%