my $mungable = Munge->new( file=>'data' ); my $sorted = $mungable->sort( by=>size ); my $mangled = $mungable->mangle(); my $subset_of_mangled = $mangled->subset( some=>'criteria' ); my $subset_of_sorted = $sorted->subset( some=>'criteria' ); my $subset_of_orig = $mungable->subset( some=>'criteria' );