#!/usr/bin/perl

if(!@ARGV)
{
    print "** Usage: ./runport 27015 valve gasworks\n";
      die "** Or   : ./runport portNo gameName mapName\n\n"; 
}
system("touch in.$ARGV[0] out.$ARGV[0]");
system("tail --lines=0 --follow=name --retry in.$ARGV[0] | ./hlds_l -game $ARGV[1] +exec server.cfg -port $ARGV[0] +map $ARGV[2] >> out.$ARGV[0] &");
