Programovacie jazyky, rady, poradňa...
scriptType
Príspevky: 110 Registrovaný: 22 feb 2011, 19:34
Príspevok
od používateľa scriptType 03 dec 2011, 23:14
Zdravim.
Ako udržať program napísaný v Perl otvorený? Resp. po spustení programu a rýchleho vypísania výstupu sa program hneď zavrie, pokiaľ nieje na konci nejaký cyklus. Čo treba pripísať do programu, aby zostala konzola otvorená?
Napr.
Kód: Vybrať všetko
#!/usr/bin/perl
print "Zadaj trojciferné číslo: ";
$cislo = <STDIN>;
if ($cislo =~ /^[1-9]\d{2}$/)
{
print "OK\n";
}
else
{
die "Chyba! Toto nie je trojciferné číslo!\n";
}
BX
Príspevky: 4572 Registrovaný: 10 jan 2008, 15:30
Príspevok
od používateľa BX 03 dec 2011, 23:20
Ak si srpávne spomínam, nebolo tam niečo ako čítanie zo stdin
Alebo to spúšťaj z príkazového riadka a nemáš problém
scriptType
Príspevky: 110 Registrovaný: 22 feb 2011, 19:34
Príspevok
od používateľa scriptType 03 dec 2011, 23:33
To bol len taky priklad. Ide to spustit ale hned sa to vypne ked napr. ulozim do .pl suboru takyto kod,
Kód: Vybrať všetko
#!/usr/bin/perl
print "Text text text text text\n";
Skusal som to aj pustit v prikazovom riadku toho perlu ale to nespustilo nic.
V cecku to myslim bolo nejako cin.get(); Ako je to v perli?
BX
Príspevky: 4572 Registrovaný: 10 jan 2008, 15:30
Príspevok
od používateľa BX 03 dec 2011, 23:54
xadman
Príspevky: 305 Registrovaný: 09 mar 2011, 17:02
Príspevok
od používateľa xadman 04 dec 2011, 10:23
scriptType napísal:To bol len taky priklad. Ide to spustit ale hned sa to vypne ked napr. ulozim do .pl suboru takyto kod,
Kód: Vybrať všetko
#!/usr/bin/perl
print "Text text text text text\n";
Skusal som to aj pustit v prikazovom riadku toho perlu ale to nespustilo nic.
V cecku to myslim bolo nejako cin.get(); Ako je to v perli?
V C to je getchar(); v C++ by to malo byt asi cin >> premenna;
