bristol@mailman.lug.org.uk
To subscribe or unsubscribe via the World Wide Web, visit
https://mailman.lug.org.uk/mailman/listinfo/bristol
or, via email, send a message with subject or body 'help' to
bristol-request@mailman.lug.org.uk
You can reach the person managing the list at
bristol-owner@mailman.lug.org.uk
When replying, please edit your Subject line so it is more specific
than "Re: Contents of Bristol digest..."
Today's Topics:
1. Re: Bulk Exif date insertion - Perl error (Peter Hemmings)
----------------------------------------------------------------------
Message: 1
Date: Thu, 6 Oct 2016 12:44:46 +0100
From: Peter Hemmings <peternsomerset@virginmedia.com>
To: Shane McEwan <shane@mcewan.id.au>, Bristol and Bath Linux User
Group <bristol@mailman.lug.org.uk>
Subject: Re: [bristol] Bulk Exif date insertion - Perl error
Message-ID: <0c61bbae-7c4e-b356-b723-c62f1638d06e@virginmedia.com>
Content-Type: text/plain; charset=utf-8; format=flowed
Thanks for all the info.
I did not reproduce the error as I thought it was a simple problem!
The funny think was that it seemed to work with the "website" once, but
I could not see how it got its input, so posted quite a lot of info!!
On 06/10/16 12:01, Shane McEwan via Bristol wrote:
> The error you're getting is from the "@pix = `ls *.JPG *.jpg`;" line
> which is trying to list all the JPG and jpg files in the current
> directory. If all your files are ".jpg" and you don't have any ".JPG"
> files then ls will complain that you don't have any JPG files:
>
> ls: cannot access *.JPG: No such file or directory
Yep
>
> As the author says, you can safely ignore the error. Or change that line
> so that you're only listing extensions that actually match real files.
OK
>
> It's a very poorly written Perl script. The other warning you're getting
> about $my_website only being used once is because of this line:
>
> system("exiv2 -M'set Exif.Image.Artist $my_name $my_website' $pix");
>
> And the warning is because that line is using a $my_website variable but
> that variable isn't actually defined anywhere in the script! Because
> Perl's strict mode isn't turned on this is just a warning and won't
> affect the operation of the script.
I assume this is because the author could not be bothered, but it is
quite a simple correction!
>
> To get rid of the warning simply delete the $my_website variable from
> that line so it looks like this:
>
> system("exiv2 -M'set Exif.Image.Artist $my_name' $pix");
>
> Alternatively, you could prompt for a website by putting:
>
> print "Enter Your Website: ";
> chomp($my_website = <>);
>
OK
> . . . between the Name and Year prompts.
>
> Hope this helps!
Yep,I forgot to mention it was a basic problem!
>
> Shane.
>
> On 06/10/16 11:21, Peter Hemmings via Bristol wrote:
>> Hi,
>>
>> I have started to scan old transparencies onto my PC and have bulk
>> renamed them OK with "Thunar" file manager.
>> Before I import them I want to insert exif dates on groups of images.
>>
>> I have been trying exiv2 with a perl script to bulk insert. It does seem
>> to work but throws up errors as the originator expected but I am curious
>> to know where the problem is and if I can eliminate it!
>>
>> I know very little about perl but can get the idea of what the script
>> does.
>>
>> Can anyone enlighten me as to if the problem is with exiv2 or the script
>> and how I could make it work better?
Just sorted a box of 90 transparencies, only another 10 to go!
FYI I had to use windoze 7 with Epson V500 driver as the function to
scan transparencies did not seem to be a function on linux driver.
Scanning only 4 at a time is slow but results are better than expected.
Regards
--
Peter H
------------------------------
Subject: Digest Footer
_______________________________________________
Bristol mailing list
Bristol@mailman.lug.org.uk
https://mailman.lug.org.uk/mailman/listinfo/bristol
------------------------------
End of Bristol Digest, Vol 664, Issue 6
***************************************
Tidak ada komentar:
Posting Komentar