RosettaCodeData/Task/Terminal-control-Cursor-positioning/Perl/terminal-control-cursor-positioning.pl
2015-02-20 00:35:01 -05:00

5 lines
98 B
Perl

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