Help for this page

Select Code to Download


  1. or download this
        my $funcName     = (caller(0))[3];
    my $player_name  = shift;
...

    (my $testgamedir = $gamedir) =~ s/\W/*/;
    print STDERR "\$HOME = $HOME\n\$testgamedir = $testgamedir\n\$mapn
+ame = $mapname\n";
  2. or download this
    $HOME = /services/qw
$testgamedir = fortress*
$mapname = 2fort5
Map doesn't exist! -> /services/qw/fortress/maps/2fort5.bsp
  3. or download this
        my $funcName     = (caller(0))[3];
    my $player_name  = shift;
...

    (my $testgamedir = $gamedir) =~ s/\W/*/;
    print STDERR "\$HOME = $HOME\n\$testgamedir = $testgamedir\n\$mapn
+ame = $mapname\n";
  4. or download this
    $HOME = /services/qw
$testgamedir = fortress
$mapname = 2fort5
Map exists! -> /services/qw/fortress/maps/2fort5.bsp