scalar @monte_cristo; sub task { kill( SIGHUP, "mockingbird" ); } $_**(1/2); $_**(1/3); $_**(1/4); for ( @whom ) { toll( chr(7) ); } $nights[11]; sub king { return; } $here..$eternity undef $arms; if ( 1 ) { $postman->ring() for (1..2); } grep /Red October/, @_; #### The Count of Monte Cristo To Kill a Mockingbird Roots For Whom The Bell Tolls Twelfth Night Return Of The King From Here to Eternity A Farewell To Arms The Postman Always Rings Twice The Hunt For Red October