script de perl -> php

[Javiercg_]

Hola necesito pasar este escript en perl a PHP:

#!/usr/local/bin/perl

if ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {
my $str="";
while (<STDIN>) {$str=$str.$_;}
...
}

mi problema es que no encuentro el equivalente a:

while (<STDIN>) {$str=$str.$_;}

para capturar información que me llega vía POST

HE hecho esto:

if ($_SERVER['REQUEST_METHOD'] == 'POST'){
$consola = fopen("php://stdin", "r");
do { // Inicio del bucle
$read = trim(fread($consola, 512));
$cabeceras.=$read;
} while ($read != "");
echo "Saliendo...";
fclose($consola);
}

¿es correcto?

gracias a todos