#ex_03-2 #Learning Perl Appendix A, Exercise 3.2 print "Enter the line number: "; chomp($a = ); print "Enter the lines, end with ^D:\n"; @b = ; print "Answer: $b[$a-1]";