Advertisement
If you have a new account but are having problems posting or verifying your account, please email us on hello@boards.ie for help. Thanks :)
Hello all! Please ensure that you are posting a new thread or question in the appropriate forum. The Feedback forum is overwhelmed with questions that are having to be moved elsewhere. If you need help to verify your account contact hello@boards.ie

perl program to list all jpg's in folder - help!!

Options
  • 21-08-2009 3:20pm
    #1
    ambasite
    Registered Users Posts: 599 ✭✭✭


    i am trying ot list all jpg's in folder - "/home/user/Pictures/misc" - when i run the program below it does not list anything, it does not read the folder set in $dir. any ideas? thanks.

    #!/usr/bin/perl
    $dir = "/home/user/Pictures/misc";
    opendir (PHOTO, "$dir") || die "Cannot open directory $dir: $!";
    while (readdir(PHOTO)) {
    foreach $file (<*.jpg>) {
    print "$file\n";
    }
    }
    close (PHOTO);


Comments

  • Options
    #2
    ambasite
    Registered Users Posts: 599 ✭✭✭ambasite


    i'll get my coat..... :rolleyes:

    #!/usr/bin/perl
    @files = </home/user/Pictures/misc/*.jpg>;
    foreach $file(@files) {
    print "$file\n";
    }


  • Options
    #3
    boars.ie
    Closed Accounts Posts: 20 ✭boars.ie


    perl -e 'while(</blah/blah/*.jpg>){print "$_\n";}'

    Isn't it in a manual btw?


Advertisement