\r\n"; print "

iStreamdev

\r\n"; print " Recordings\r\n"; print "
"; print " {$subdir}\r\n"; print "

"; $dir_handle = @opendir($dir); if (!$dir_handle) { print "Unable to open $dir"; } else while ($recname = readdir($dir_handle)) { if($recname == "." || $recname == ".." || $recname == "epg.data" || $recname == 'lost+found') continue; $recname2 = addslashes($recname); $date = preg_replace('/-/', '/', substr($recname2, 0, 10)); $time = preg_replace('/\./', 'h', substr($recname2, 11, 5)); $recnice = $date .' at ' .$time; if (strstr($recname, ".rec") == ".rec") { $date = preg_replace('/-/', '/', substr($recname, 0, 10)); $time = preg_replace('/\./', 'h', substr($recname, 11, 5)); $recnice = $date .' at ' .$time; print "
• $recnice
\r\n"; print "
"; print " "; print " "; print " "; print "
\r\n"; } else { $recnice = $recname; if ($recnice[0] == '@') $recnice = substr($recnice, 1); $recnice = preg_replace('/\_/', ' ', $recnice); print "
• $recnice
\r\n"; print "
"; print " "; print " "; print "
\r\n"; } } $updir = dirname($dir); print "
\r\n"; if ($dir_handle) closedir($dir_handle); print "