Select Code to Download

print 
"this is line 1 $somevar
...
this is line 4
this is line 5
";

use constant { NODE=>0, TYPE=>1, COMMENT=>2 ...};
my @d;
...
notification_options   d,u,r
}
";