RosettaCodeData/Task/Terminal-control-Cursor-positioning/Perl/terminal-control-cursor-positioning.pl
2023-07-01 13:44:08 -04:00

5 lines
98 B
Perl

use Term::Cap;
my $t = Term::Cap->Tgetent;
print $t->Tgoto("cm", 2, 5); # 0-based
print "Hello";