path: root/challenge-045/e-choroba/perl/ch-2a.pl

#!/usr/bin/perl
use warnings;
use strict;

seek *DATA, 0 , 0;
print <DATA>;
__DATA__