no warnings 'uninitialized'; $line = eval qq{"$line"};