не понимаю почему у меня не работает прога...
Код:
#!/usr/bin/perl
@array = (1,2,3,4,5);
foreach $next (@array)
{
print "$next";
sleep 1;
print "\b";
}
нужно сделать следующее: сначала пишеться 1, затем пауза 1 сек, потом 1 стираеться и на её месте пишеться 2, затем пауза 1 сек, потом стираеться 2 и пишеться на её месте 3, и тд.
если написать так
Код:
#!/usr/bin/perl
@array = (1,2,3,4,5);
foreach $next (@array)
{
print "$next";
sleep 1;
print "\n";
}
то всё работает, есть пауза, но это не то что мне нужно, так как с новой строки всё выдаёться
помогите!
