Understand::Gui::line()
Returns the line of the cursor in the current file being edited, or returns 0 (zero) if no file is being edited.
my $line = Understand::Gui::line();