Ker nisem ve programiranja v perlu bi rabil nasvet. Zanima me kako naj
izvedem zanko v stilu
repeat
until keypressed
:)
lp
dalibor
___
lugos-list mailing list
lugos-list@lugos.si
http://liste2.lugos.si/cgi-bin/mailman/listinfo/lugos-list
On 6/16/05, Dalibor [EMAIL PROTECTED] wrote:
Ker nisem ve programiranja v perlu bi rabil nasvet. Zanima me kako najizvedem zanko v stilurepeatuntil keypressed
Spodnja resitev dela bolj v smislu:
repeat
# delam delam delam...
until enter_pressed
#!/usr/bin/perl
for (my $i = 0; $i 100; $i++) {
Dalibor wrote:
Ker nisem ve programiranja v perlu bi rabil nasvet. Zanima me kako
naj izvedem zanko v stilu
repeat
until keypressed
Uprabis Term::Readkey :
Lahko
use Term::ReadKey;
while (!defined($key=Term::ReadKey(10))) {
print timeout!\n unless defined($key);
}
Seveda lahko das timeout
Cool. To bo tudi v redu.
Hvala!
Gregor Berginc wrote:
On 6/16/05, *Dalibor* [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] wrote:
Ker nisem ve programiranja v perlu bi rabil nasvet. Zanima me
kako naj
izvedem zanko v stilu
repeat
until keypressed
Spodnja resitev dela bolj
Simple as that!!
Matija Grabnar wrote:
Dalibor wrote:
Ker nisem ve programiranja v perlu bi rabil nasvet. Zanima me kako
naj izvedem zanko v stilu
repeat
until keypressed
Uprabis Term::Readkey :
Lahko
use Term::ReadKey;
while (!defined($key=Term::ReadKey(10))) {
print timeout!\n unless
Matevz Lipanje wrote:
Imam delujoc PostgreSQL 6.5.2-1 vendar se problem pojavi pri
zaganjanju CGI script v Perl-u 5 z uporabo DBI modula 1.13-1 oz.
DBD-Pg 0.91-2 driver-ja.
Dobim namrec sledece sporocilo:
#
install_driver(Pg) failed: DBD::Pg object version 0.91 does not match
bootstrap
Jaz imam PostgreSQL v7.0.2, DBD:Pg 0.95 in DBI 1.14 in dela.
Sem upgradu na te verzije... in sedaj dela.
Hvala
Lep Pozdrav,
Imam delujoc PostgreSQL 6.5.2-1 vendar se problem
pojavi pri zaganjanju CGI script v Perl-u 5 z uporabo DBI modula 1.13-1 oz.
DBD-Pg 0.91-2 driver-ja.
Dobim namrec sledece
sporocilo:#install_driver(Pg) failed: DBD::Pg object version 0.91
does not match bootstrap parameter
mount: RPC: unable to recieve: Errno = connection refused.
Tole najbrz pomeni, da na oddaljeni masini RPC ne tece.
startanju pravi execvp permission denied.
To pa pomeni, da skusas nekaj zagnati, pa so permission biti narobe postavljeni.
Poskusi ugotoviti, tocno kateri ukaz ti javlja to
®ivjo vsem skupaj!
Imam te¾ave z nfs. Dokler nisem brkljala po hosts.allow in hosts.deny
sem normalno mountala home iy ene linux masine na drugo.
Zdaj pa imam te¾ave z RPC.
mount: RPC: unable to recieve: Errno = connection refused.
Pri uga¹anju host noèe ugasniti statd demona,
in pri
Kako v Perlu najbolj enostavno zamenjati del iskanega pattern-a. Npr. v
stringu iscem "abcd" zamenjati pa hocem samo "b".
Darko
s/(a)b(cd)/$1krneki$2/
ali enostavneje:
s/abcd/akrnekicd/;
lp,
--
Borut
[EMAIL PROTECTED]
Zadeva deluje - najlepsa hvala!
Kako v Perlu najbolj enostavno zamenjati del iskanega pattern-a. Npr. v
stringu iscem "abcd" zamenjati pa hocem samo "b".
Ce je a in cd konstanten string:
s/abcd/anovibcd/
Ce a in cd nista konstantna stringa:
s/(a)b(cd)/$1novi$2/
Sicer pa je za perl vprasanja najbolj primerna lista [EMAIL
Pozdravljeni!
Zanima me ce mi lahko kdo pove, kako bi v perlu poiskal neko besedo, in ce
obstaja bi jo zamenjal z drugo besedo (obe besedi bi bili podani kot $1 in $2 -
argumenta skripti.
fajl v katerem so te besede je zgrajen takole:
usernamepass (vmes je tab)
Se pravi rad bi, da mi
On Fri, Aug 18, 2000 at 11:20:10AM +0200, Bostjan Muller wrote:
fajl v katerem so te besede je zgrajen takole:
username pass (vmes je tab)
Se pravi rad bi, da mi skripta zamenja geslo, ki pride za tabom, pa mi to
nekako ne uspe:
s temle: s/($1)\t.*/$1\t$2/; mi vedno izbrise gesla in ne
* On 18-08-00 at 13:15 Borut Mrak ([EMAIL PROTECTED]) wrote:
+Here quoted text begins+
sicer pa to ni najboljsi nacin za to, kar zelis doseci (vsaj meni se tako
zdi). Za spreminjaje passwordov za UW-imap server uporabljam jaz nekaj
takega (z dodanimi se par dodatnimi sanity checki)
On Fri, Aug 18, 2000 at 02:16:04PM +0200, Bostjan Muller wrote:
Hmm... meni tole ni delalo - ni zamenjalo gesla, ampak pac dobim se eno
identicno kopijo :(
Zato, ker v datoteki ni nikjer na prvem mestu $ARGV[1] (username).
lp,
--
Borut
[EMAIL PROTECTED]
-
En dan je en dan,
Prvo LUGOSovo predavanje v sklopu Sredinih seminarjev bo prav iz Perla.
Bo to bolj za zacetnike, intermediate al ze expert in hardcore users? Al
za vsakega po malo? Namrec jaz se nisem delal s perlom, me pa zelo
zanima, zato bi prisel.
Ne bom se ukvarjal s tem, kaj pomeni stavek if, torej
Ziv.
Prvo LUGOSovo predavanje v sklopu Sredinih seminarjev bo prav iz Perla.
Bo to bolj za zacetnike, intermediate al ze expert in hardcore users? Al
za vsakega po malo? Namrec jaz se nisem delal s perlom, me pa zelo
zanima, zato bi prisel.
Nejk0
Hojla!
On Sat, 17 Jun 2000, Nejc Skoberne wrote:
Bo to bolj za zacetnike, intermediate al ze expert in hardcore users? Al
za vsakega po malo? Namrec jaz se nisem delal s perlom, me pa zelo
zanima, zato bi prisel.
Ve bo jasno ob uradni najavi predavanja.
Miha...
- Miha
Vprasanje
Kateri jezik je najboljsi za izdelavo hompagov kot
je tripod, da vsebuje vso avtomatizacijo za registriranje userja, do uporabe
datotek ki so na serverju da avtomatsko skripta poda www.domena.com/user, da lahko reanme svoje
file,. s katerim jezikom je to najlazje nardit a
[EMAIL PROTECTED] wrote:
Pronja pa je: Ali je kdo med vami pripravljen intruirati Perl.
Jaz imam en Perl tutorial - "Perl in 21 days".
Dolg je priblizno 550kB, kar je pomojem prevec za poslati
direkno na listo, zato bi bilo pomojem najbolje da ga
posljem nekomu ki ga da na www.lugos.si, ker je
Jure Mercun wrote:
Jaz imam en Perl tutorial - "Perl in 21 days".
Dolg je priblizno 550kB, kar je pomojem prevec za poslati
direkno na listo, zato bi bilo pomojem najbolje da ga
posljem nekomu ki ga da na www.lugos.si, ker je precej
dober in bi verjetno koristil se komu.
Zaenkrat je na
®ivjo LUGOSOVCI!
Imam eno vra¹anje in eno pro¹njo!
Upam, da s tem ne kr¹im pravila lugos liste.
Vpra¹anje je:
Ali je komu jasno, zakaj pri vnosu podatkov v Oraclovo bazo z uporabo Perla
za vsako vrstico in vsak stolpec ne glede na to, ali je poln ali prazen,
napi¹e 'uzed of uninitialized
smbuls Ali je komu jasno, zakaj pri vnosu podatkov v Oraclovo bazo z
smbuls uporabo Perla za vsako vrstico in vsak stolpec ne glede na to,
smbuls ali je poln ali prazen, napi¹e 'uzed of uninitialized value,
smbuls kar napi¹e v primeru, èe ga blanki motijo'.
Si sigurna da je problem v Perlu? Jaz
Zivjo!
On Fri, 16 Jun 2000, [EMAIL PROTECTED] wrote:
Ali je komu jasno, zakaj pri vnosu podatkov v Oraclovo bazo z
uporabo Perla za vsako vrstico in vsak stolpec ne glede na to, ali
Pro¹nja pa je: Ali je kdo med vami pripravljen in¹truirati Perl.
Za programiranje obstaja locen dopisni
Hojla!
On Fri, 16 Jun 2000 [EMAIL PROTECTED] wrote:
Pronja pa je: Ali je kdo med vami pripravljen intruirati Perl.
Prvo LUGOSovo predavanje v sklopu Sredinih seminarjev bo prav iz Perla.
28.6.2000 ob 18.00 (18.15) bo Matija Grabnar predaval o Perlu.
Nadaljne toneje in podrobneje
Hojla!
Na tole sem naletel med prevajanjem nove verzije Gimpa (1.1.18).
Ce imate instaliran Perl 5.005_02 bo vase prevajanje trajalo v nedogled
oziroma do bridkega konca z "Out of memory".
Mogoce se bug pokaze se kje drugje, zato vsem svetujem da si instalirate
Perl 5.005_03 ali cel
Zdravo!
A obstaja na listi kaken relativno dober programer, ki obvlada perl in ima
priblino 2 tedna asa za programiranje in testiranje? (seveda dobi plaano)
Med drugim gre za povezovanje do SQL baz (Oracle in MS SQL 7).
LP,
Iztok
Je komu uspelo z UNIXa dostopati do MSSQL? DBD::ODBC
zahteva neke Driver
Managerje, pa nimam pojma, kje bi jih dobil za MS SQL in bi
delovale na
UNIXu.
http://odbs.linuxbox.com
tukaj se dobi dodaten sistemski servis za winnt, preko
katerega lahko z odbc
dostopa do mssql.
Zveni
Pozdravljeni!
Imam neko skripto, ki naj bi za neko stevilo sprejetih vrstic (+200) zapisala
nekaj v drug file, vendar pa ima za variable @letters napisane le rke od a
z, se pravi le 25 znakov, zato bi rad uporabil kaj podobnega kot je tole iz
bash skripte: n=$(($n+1)) namesto @letters = qw(a b
Pozdravljeni!
Zanima me ce kdo ve kje bi nasel kaka dobra navodila za perl - sintaksa,
primeri in podobno.
Vnaprej hvala!
Botjan
--
Botjan Mller [NEONATUS], [EMAIL PROTECTED], http://surf.to/NEONATUS
RSA id: 0x90178DBD, ICQ #:7506644, PGP key: finger [EMAIL PROTECTED]
Registered Linux
On Mon, Sep 27, 1999 at 12:59:37AM +0200, Bo?tjan Muller [NEONATUS] wrote:
Pozdravljeni!
Zanima me ce kdo ve kje bi nasel kaka dobra navodila za perl - sintaksa,
primeri in podobno.
Vnaprej hvala!
Priporocam
Programming Perl / O'Reilly :)
Drugace se pa da dobiti tudi kaj v PS formatu,
Zraven perla pride cel kup dokumentacije.
Poskusi komando perldoc.
Recimo perldoc perlfunc
perldoc perlfaq
perldoc kar tako, pa se in se in se.
Primer je kolikor hoces na comp.lang.perl.misc in comp.lang.perl.moderated.
Ce imas pa kaksno konkretno vprasanje, pa kar z besedo na dan.
--
"My
Hi!
Zanima me, kje lahko najdem kako skripto (perl), ki bi mi poslala mail
nekam.
Konkretno rabim mail na GSM ob nekem dogodku.
Mislim, da mi jo je Jernej enkrat poslal, pa se mi je nekje izgubila
:((
TNX !
LP,
miLAN
On Sat, Aug 28, 1999 at 04:43:26PM +0200, Milan Gabor wrote:
Hi!
Zanima me, kje lahko najdem kako skripto (perl), ki bi mi poslala mail
nekam.
Konkretno rabim mail na GSM ob nekem dogodku.
Mislim, da mi jo je Jernej enkrat poslal, pa se mi je nekje izgubila
:((
TNX !
LP,
miLAN
: Saturday, August 28, 1999 6:12 PM
To: [EMAIL PROTECTED]
Subject: Re: [ LUGOS ] Perl skripta za posiljati mail na dolocen
streznik
On Sat, Aug 28, 1999 at 04:43:26PM +0200, Milan Gabor wrote:
Hi!
Zanima me, kje lahko najdem kako skripto (perl), ki bi mi poslala mail
nekam.
Konkretno
On Sat, Aug 28, 1999 at 06:26:53PM +0200, Milan Gabor wrote:
Hi!
Ja samo, potem moram imeti na masini skonfiguriran sendmail ali kaj drugega.
Jaz bi se rad povezal na drugi mail server in poslal z dolocenega mail
naslova
mail.
ja, potem pa poglej CPAN, kaksen modul sigurno obstaka
Hail
Imam nekaj skriptic napisanih v perlu, in sedaj me zanima, kako bi te
skripte executal v HTTP. Npr. Ta skripta nekaj zmuti po sstemu in nardi
output v HTML obliki. pa recmo da bi do nje dostopal z http://IP/skripta.pl
Imam Slack 4.0 in apache 1.3.9
lp
Tadej
Tadej Slemc wrote:
Hail
Imam nekaj skriptic napisanih v perlu, in sedaj me zanima, kako bi te
skripte executal v HTTP. Npr. Ta skripta nekaj zmuti po sstemu in nardi
output v HTML obliki. pa recmo da bi do nje dostopal z http://IP/skripta.pl
Imam Slack 4.0 in apache 1.3.9
lp
Tadej Slemc wrote:
Hail
Imam nekaj skriptic napisanih v perlu, in sedaj me zanima, kako bi te
skripte executal v HTTP. Npr. Ta skripta nekaj zmuti po sstemu in nardi
output v HTML obliki. pa recmo da bi do nje dostopal z http://IP/skripta.pl
Imam Slack 4.0 in apache 1.3.9
lp
Tadej
Hola!
Uporabljal sem Mail::Header v perlu, in uspel dobiti From, To ... naslove
iz samega e-maila, vendar so oblike:
Iztok Umek [EMAIL PROTECTED]
Kako bi iz tega izluscil sam e-mail naslov?
recimo da je ta naslov v $to
$to=~/([^]*)/; v $1 je zdaj vse, kar se je nahajalo med in .
--
Hola!
Uporabljal sem Mail::Header v perlu, in uspel dobiti From, To ... naslove
iz samega e-maila, vendar so oblike:
Iztok Umek [EMAIL PROTECTED]
Kako bi iz tega izluscil sam e-mail naslov?
LP,
Iztok
--
[EMAIL
nt: Monday, May 03, 1999 8:16 PM
To: [EMAIL PROTECTED]
Subject: [ LUGOS ] Perl E-mail
Hola!
Uporabljal sem Mail::Header v perlu, in uspel dobiti From, To
... naslove
iz samega e-maila, vendar so oblike:
Iztok Umek [EMAIL PROTECTED]
Kako bi iz tega izluscil sam e-mail naslov?
LP,
Napisal si :
Uporabljal sem Mail::Header v perlu, in uspel dobiti From, To ... naslove
iz samega e-maila, vendar so oblike:
Iztok Umek [EMAIL PROTECTED]
Kako bi iz tega izluscil sam e-mail naslov?
Recimo, da tole sparsa kar je med ""
#!/usr/local/bin/perl
$str = 'Iztok Umek [EMAIL
45 matches
Mail list logo