$scrolledText -> insert('end', "<< $line") or die "Can not insert: $!\n";