Announcement

Collapse
No announcement yet.

Kompletten Pfad ermitteln

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Kompletten Pfad ermitteln

    Hi,
    wenn ich folgende Statements habe
    my $myfile="d1/xxxxx";
    open(mh,">$myfile");
    Wie bekomme ich heraus wo die Datei gesucht wird, d.h. den kompletten Pfad zur Datei?

  • #2
    steht in $myfile, steht da ein relativer Pfad kannst du das nicht rausbekommen
    Zuletzt editiert von Christian Marquardt; 23.12.2010, 15:31.
    Christian

    Comment


    • #3
      Du könntest mit Path::Class arbeiten (das musst Du ggf. noch installieren):

      Code:
      use Path::Class;
      
      my $myfile="d1/xxxxx";
      open(mh,">$myfile");
      
      my $file_object = Path::Class::File->new( $myfile );
      print "Absoluter Pfad: ", $file_object->absolute;
      Bzgl. des opens: Du solltest auf jeden Fall Fehlerbehandlung machen und wenn möglich auch die 3-arg-Form von open verwenden. Siehe auch http://reneeb-perlblog.blogspot.com/...s-zu-open.html
      Perl-Magazin
      Perl-Nachrichten

      Comment


      • #4
        Originally posted by reneeb View Post
        Du könntest mit Path::Class arbeiten (das musst Du ggf. noch installieren):
        Wie installiere ich dies unter XAMPP?

        (Hoffentlich wird dies noch gelesen - war lange Zeit ausser Gefecht gesetzt!)

        Comment


        • #5
          http://www.cgicorner.ch/cgi-bin/kb/k...ile=win_ppm.kb
          Christian

          Comment


          • #6
            Das wird unter XAMPP nicht funktionieren, da dort kein ActiveState Perl installiert ist, sondern nur etwas ganz rudimentäres. Das sinnvollste wird sein, ActiveState Perl zu installieren und das dann entsprechend einzubinden. (alternative geht natürlich auch strawberry Perl)

            Comment


            • #7
              Auch wenn ich etwas spät dran bin. Hier werden verschiedene Wege beschrieben, wie man Module installiert: http://wiki.perl-community.de/Wissen...ereIchEinModul
              Perl-Magazin
              Perl-Nachrichten

              Comment

              Working...
              X