Contents of
print $rpm . "
";
//$Files = array ();
// exec the rpm command and get a list of files
//exec ( "/bin/rpm -qpl " . $rpm, $Files );
if ( ($File = popen( "/usr/bin/w", "r" )) == false ) {
print "error";
}
while ( ! feof ( $File ) ) {
$Line = fgets ( $File, 1000 );
echo $Line . "
";
}
// close the file
pclose ( $File );
?>