SimpleXML -> Array

[frankx]

Hellihello

  
<?php  
  
function overview ($dir) {  
  foreach(scandir($dir) as $dir_or_file) {  
  if (strpos($dir_or_file,".")!==0) {  
   if (is_dir($dir.'/'.$dir_or_file))  {  
    echo "<li>$dir_or_file<ul>\n";  
    overview($dir.'/'.$dir_or_file);  
    echo "</ul></li>\n";  
   }  
   else {  
    echo "<li>$dir_or_file</li>\n";  
   }  
  }  
 }  
}  
overview(".");  
  
?>  

Rekursiv:

sub scan
{
  my $where=shift;

was ist "shift"?

print "Verzeichnis: $where\n";
  my $dir=IO::Dir->new($where) or die "$where: $!";

Was ist IO::Dir? Was ist $! ?

my @items=$dir->read();
  $dir->close(); # Handles gibt es nur begrenzt, also schnell wieder freigeben
  foreach my $item (@items) {
    if (-d "$where/$item") {

-d heißt "is_dir()"?

scan("$where/$item");
    } else {
      print "Datei: $where/$item\n";
  }
}

heißt: du erzeugst ein Array mit allen Ordnerpfaden, die durchsucht werden wollen?

TO-DO-Liste:

sub scan
{
  my $start=shift;
  my @todo=($start);
  while (@todo) {
    my $where=shift @todo;
    print "Verzeichnis: $where\n";
    my $dir=IO::Dir->new($where) or die "$where: $!";
    while (my $item=$dir->read()) {
      if (-d "$where/$item") {
        push @todo,"$where/$item";
      } else {
        print "Datei: $where/$item\n";
      }
    }
    $dir->close();
  }
}

  
Dank und Gruß,  
  
[frankx](http://community.de.selfhtml.org/visitenkarten/view.php?key=82)

-- 
[tryin to](http://sauer-ernst.de) [multitain](http://multitain.de)  - Globus = Planet != Welt