Select Code to Download

#! /usr/bin/perl
use warnings;
...
1
2
3

here at /home/choroba/1.pl line 6, <DATA> line 3.
# in the script:      ~~~~~~~~~~~
# in the input:                    ~~~~~~~~~~~~~