Thread Startscript: Kleines Problem mit meinen Ideen ein Tea (34 answers)
Opened by Gast at 2005-05-15 07:04

J-jayz-Z
 2005-05-16 04:29
#54948 #54948
User since
2005-04-13
625 Artikel
BenutzerIn
[Homepage] [default_avatar]
am besten schreibst du den code etwas leserlicher...
etwa so:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
if ($brichtig eq '1') 
{
print "\nDer Server wird jetzt gestartet!";
chdir '/home/COUNTERSTRIKE/COUNTERSTRIKE/COUNTERSTRIKE';
print qx'screen ./hlds_run -game cstrike +maxplayers $bslot +map $bmap';
print "\n\n\nCounterStrike Manuell wirdgestartet!\n\n";
exit;
}
elsif ($brichtig eq '2')
{
goto check1;
}
elsif ($brichtig eq '3')
{
goto counterstrike;
}
else ($brichtig gt '4')
{
print "FALSCHE EINGABE!\n";
goto counterstrike;
}
}

so kann man doch viel gemütlicher nach Fehlern suchen...
Wenn du unbedingt einen einzeiler schreiben willst, schau mal, wie man mit perl -e umgeht *g
Kannst du auch mal den ganzen Code posten?
Ist dann vielleicht einfacher, den Fehler zu finden...
perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de

View full thread Startscript: Kleines Problem mit meinen Ideen ein Tea