Weblabor

<? echo $_SERVER[argv][1] . "\n" ?>
<?=$_SERVER["argv"][1] . "\n"?>
<?=$argv[1] . "\n"?>
<?="$argv[1]
"?>

access environment variable: 28/23/17/13
<? echo $_ENV[HOME] . "\n"?>
<?=$_ENV[HOME] . "\n"?>
<?=$HOME . "\n"?>
<?="$HOME
"?>

return exit code error (non zero) if a file does not exist: 43/43/43/40 
<? file_exists("/etc/mtab") or exit(1); ?>
<? file_exists("/etc/mtab") or exit(1); ?>
<? file_exists("/etc/mtab") or exit(1); ?>
<? file_exists("/etc/mtab")or exit(1)?>

return exit code error (non zero) if a file is not readable: 43/43/43/40
<? is_readable("/etc/mtab") or exit(1); ?>
<? is_readable("/etc/mtab") or exit(1); ?>
<? is_readable("/etc/mtab") or exit(1); ?>
<? is_readable("/etc/mtab")or exit(1)?>

call an external program and check the return value: 81/81/81/74
<? system("false") or fwrite(STDERR, "false failed\n"); 
system("echo done"); ?>
<? system("false") or fwrite(STDERR, "false failed\n"); 
system("echo done"); ?>
<? system("false") or fwrite(STDERR, "false failed\n"); 
system("echo done"); ?>
<? system("false")or fwrite(STDERR,"false failed
");system("echo done")?>

remove #-comments from a file (modifying the file, i.e. in place): 126/126/117/110
<?
$name = $_SERVER[argv][1];
$result = preg_replace("/#.*/", "", file_get_contents($name)); 
file_put_contents($name, $result);
?>
<?
$name = $_SERVER[argv][1];
$result = preg_replace("/#.*/", "", file_get_contents($name)); 
file_put_contents($name, $result);
?>
<?
$name = $argv[1];
$result = preg_replace("/#.*/", "", file_get_contents($name)); 
file_put_contents($name, $result);
?>
<? $name=$argv[1];$result=preg_replace("/#.*/","",file_get_contents($name));file_put_contents($name,$result)?>

find and compile .c files into .o when the .o is old or absent: 447/345/xxx/257
!szinte csak ugyanugy csinaltam a behuzast mint az sh es ~100 char!
<?
function doit($p) {
    $d = dir($p);
    while ($f = $d->read()) {
        $c = $p . '/' . $f;
        if (is_dir($c) && $f != '.' && $f != '..') {
            doit($c);
        } elseif (ereg('(.*\.)c$', $c, $r)) {
            $o = $r[1] . 'o';
            if (filemtime($o) < filemtime($c)) {
                echo "compiling $c to $o\n";
                system("gcc -c -o $o $c");
            }
        }
    }
    $d->close();
}
doit('.');
?>
<?
function doit($p) {
	$d = dir($p);
	while ($f = $d->read()) {
		$c = $p . '/' . $f;
		if (is_dir($c) && $f != '.' && $f != '..') {
			doit($c);
		} elseif (ereg('(.*\.)c$', $c, $r)) {
			$o = $r[1] . 'o';
			if (filemtime($o) < filemtime($c)) {
				echo "compiling $c to $o\n";
				`gcc -c -o $o $c`;
			}
		}
	}
	$d->close();
}
doit('.');
?>
<? ... ?>
<? function doit($p){$d=dir($p);while($f=$d->read()){$c="$p/$f";if(is_dir($c)&&$f!='.'&&$f!='..'){doit($c);}elseif(ereg('(.*\.)c$', $c, $r)){$o="$r[1]o";if(filemtime($o)<filemtime($c)){echo"compiling $c to $o\n";`gcc -c -o $o $c`;}}}$d->close();}doit('.')?>

grep with -F -i -h handling, usage, grep'ing many files:
ez kimaradt?