view release on metacpan or  search on metacpan

lib/Acme/HowToMakeSushi/Photo.pm  view on Meta::CPAN

our $VERSION = "0.02";

END{
	unless ($? != 0) { #  success making sushi
	print decode_base64(<<'END_OF_SUSHI'
/9j/4AAQSkZJRgABAQEBLAEsAAD//gArT3B0aW1pemVkIGJ5IEpQRUdtaW5pIDMuOC44LjhMIDB4NzczNjE2NmP/2wBDAAUDBAQEAwUEBAQFBQUGBwwIBwcHBw8LCwkMEQ8SEhEPERETFhwXExQaFRERGCEYGh0dHx8fExciJCIeJBweHx7/2wBDAQUFBQcGBw4ICA4eFBEUHh4eHh4eHh4eHh4eHh4eHh4eHh4eHh4eHh4eHh4eHh4eHh...
END_OF_SUSHI
);
}else{
	print decode_base64(<<'END_OF_SUSHI'
/9j/4AAQSkZJRgABAAAAAQABAAD/2wBDAAYEBQYFBAYGBQYHBwYIChAKCgkJChQODwwQFxQYGBcUFhYaHSUfGhsjHBYWICwgIyYnKSopGR8tMC0oMCUoKSj/2wBDAQcHBwoIChMKChMoGhYaKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCgoKCj/wAARCAMgBLADAREAAhEBAxEB/8QAHAAAAgMBAQ...
END_OF_SUSHI
);
}
}

1;
__END__

=encoding utf-8