The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# -*-perl-*-

use strict;
use MT::Template::Context;

MT::Template::Context->add_tag(PingedUrls => sub {
    my $ctx = shift;

    if (my $entry = $ctx->stash("entry")) {
	return $entry->pinged_urls() || "";
    }

    return "";
});

return 1;