Help for this page

Select Code to Download

Select or download this

sub JPEGData {
    my $self = shift;
...
    undef $self->{_jpegfile};
    $self;
}