in reply to Lost in Perl - text file searching and printing

The exercise does not say what needs to be done with a line that ends in a period, question mark comma, but does not contain the word "it". So, I assume this program runs in a universe that does not have such lines. So, I'd write (untested):
perl -nlwe 'print $1 if /\bit\b(.*[.?,])$/' text-file
Or:
perl -nlwe '/[.?,]$/ && /\bit\b/ && print $'"'" text-file