Select Code to Download

use warnings;
use strict;
...
    
    print $_->as_HTML ();
}

<a href="some\where"><img src="apple.gif"></a>