이 계획은 왜 진행되지 않습니까?

나는 책에서 연습용 Perl 스크립트를 작성했는데 두 번째 줄부터 실행되지 않고 여전히 온라인 상태입니다. 누구든지 프로그램에 문제가 무엇인지 말해 줄 수 있습니까?