%DUMMY_AD = (
 gif => "$DUMMY_GIF\n",
 jpg => "$DUMMY_JPG\n",
 jpeg => "$DUMMY_JPG\n",
 png => "$DUMMY_PNG\n",
);
sub dummy_ad {
    print $DUMMY_AD{lc $_[0]} || "$DUMMY_HTM\n";
}