Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]5812[/thread]

scanf?



<< >> 6 Einträge, 1 Seite
Agent Smith
 2003-10-09 19:10
#62548 #62548
User since
2003-09-23
4 Artikel
BenutzerIn
[Homepage] [default_avatar]
Hi all,
Was ich suche ist eigendlich ganz simpel. Gibt es in perl etwas was scanf in c entspricht. Etwas womit ich den Wert von Variablen wärend der Ausführung des Programms verändern/bestimmen kann. Oder bin ich gezwungen alles im Code selber oder über eine config Datei vorzubestimmen und jedes mal meinen aktuellen Bedürfnissen anzupassen? Oder muss ich mit cgi oder nem GUI arbeiten?

Ich habe mich durch den gesamten cgi Teil von Selfhtml gearbeitet, mein eigendes GB geschrieben und außerdem die FAQ hier durchsucht und ich bin über nichts entsprechendes gestolpert, also hoffe ich mal das das hier keine Frage ist, die mir jeder mit RTFM beantwortet :D

THX erstmal, Adam
Ishka
 2003-10-09 19:19
#62549 #62549
User since
2003-08-04
771 Artikel
HausmeisterIn
[Homepage] [default_avatar]
$var=<STDIN>; liest eine Zeile aus der Eingabe ein.
sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}
kabel
 2003-10-09 19:31
#62550 #62550
User since
2003-08-04
704 Artikel
BenutzerIn
[default_avatar]
der rest geht mit einer regexp, oder dero zweier.
-- stefan
betterworld
 2003-10-09 20:40
#62551 #62551
User since
2003-08-21
2614 Artikel
ModeratorIn

user image
Um Euch beide zusammenzufassen, zitiere ich perldoc POSIX:
scanf() is C-specific, use <> and regular expressions instead, see perlre.
kabel
 2003-10-09 20:49
#62552 #62552
User since
2003-08-04
704 Artikel
BenutzerIn
[default_avatar]
ROFLMAO 8)
-- stefan
Agent Smith
 2003-10-14 19:06
#62553 #62553
User since
2003-09-23
4 Artikel
BenutzerIn
[Homepage] [default_avatar]
thx
<< >> 6 Einträge, 1 Seite



View all threads created 2003-10-09 19:10.