| Current Path : /usr/local/lib/perl5/site_perl/5.8.9/XML/RSS/Private/Output/Roles/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
| Current File : //usr/local/lib/perl5/site_perl/5.8.9/XML/RSS/Private/Output/Roles/ImageDims.pm |
package XML::RSS::Private::Output::Roles::ImageDims;
use strict;
use warnings;
sub _out_image_dims {
my $self = shift;
# link, image width, image height and description
return $self->_output_multiple_tags(
{ext => "image", 'defined' => 1},
[qw(width height description)],
);
}
1;