maybe a mistake in 'Learning Perl'