while (<>) {
    if (m/^<--Here goes a image.../) {
        print ...whatever...
    } else {
        print;
    }
}