Author: autarch Date: Fri Jul 7 11:35:26 2006 New Revision: 419950 URL: http://svn.apache.org/viewvc?rev=419950&view=rev Log: Remove unused variable.
Modified: perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm Modified: perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm URL: http://svn.apache.org/viewvc/perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm?rev=419950&r1=419949&r2=419950&view=diff ============================================================================== --- perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm (original) +++ perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm Fri Jul 7 11:35:26 2006 @@ -222,10 +222,10 @@ sub _linux_size_check { my $class = shift; - my ( $size, $resident, $share ) = ( 0, 0, 0 ); + my ( $size, $share ) = ( 0, 0 ); if ( open my $fh, '<', '/proc/self/statm' ) { - ( $size, $resident, $share ) = split /\s/, scalar <$fh>; + ( $size, $share ) = ( split /\s/, scalar <$fh> )[0,2] close $fh; } else {