[$ # display selected channel use URI::Escape; my @channels = get_my_sorted_channels("date_downloaded", "reversed_data"); # get the user's window target preference (which controls # whether links should open up in the current or a new window. my $link_target = get_setting( "user_link_target" ); # for each channel, parse and display. foreach my $channel (@channels) { # skip unless this is the right channel next unless ( uc($channel->{xmlurl}) eq uc(get_setting( "user_af_currentfeed_xmlurl" )) ); # and then load all the channel data. (Note that it's possible there isn't any data.) my $data = load_channel($channel->{filename}, $channel->{xmlurl}); next unless $data; # is there an email address associated with this site? my $email = $data->{channel}{managingEditor} || $data->{channel}{webMaster} || $data->{header}{webMaster} || $data->{header}{managingEditor} || undef; my $emaillink; if ($email) { $emaillink = qq{Send an email to '$channel->{title}'. }; } my $encoded_xmlurl = uri_escape($channel->{xmlurl}, "^a-zA-Z0-9_.-"); to_browser(qq{
Go To The '$channel->{title}' Site.

$channel->{title}

Last downloaded: $channel->{date_downloaded}
$emaillink View The Raw XML Source Of '$channel->{title}'. Remove this channel from your channel list
}); } $OUT = send_to_browser; $]