1de8cc8edSafresh1package HereDoc; 2*256a93a4Safresh1use strict; 3de8cc8edSafresh1$HereDoc::VERSION = 1; 4de8cc8edSafresh1 5de8cc8edSafresh1sub magic { 6de8cc8edSafresh1 print <<'END'; 7de8cc8edSafresh1package Errno; 8de8cc8edSafresh1-use vars qw($VERSION); 9de8cc8edSafresh1- 10de8cc8edSafresh1-$VERSION = "1.111"; 11de8cc8edSafresh1+our $VERSION = "1.111"; 12de8cc8edSafresh1END 13de8cc8edSafresh1} 14de8cc8edSafresh1 15de8cc8edSafresh11; 16