Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Script to insert image information into MySQL

by mel (Initiate)
on Mar 08, 2003 at 18:29 UTC ( #241413=perlquestion: print w/replies, xml ) Need Help??

mel has asked for the wisdom of the Perl Monks concerning the following question:

Hi,

I have ascript that renames images coming from a camera (placed in /home/httpd/htdocs/image.jpg) to the date of the image (2003_8_3_16_34_43.jpg) and then place the images in a new directory in /home/me/images/2003_8_3_16_34_43.jpg.

I would like to insert the images header into MySQL. (image_name, image_size, and image_date_modified). how do i do this. i have put a script together, but how do i get the image information to be sent to MySQL. please help.

use DBI; ############################################################ # Connect to Database Named cctvimages on the localhost with the roo +t user # # $dbh=DBI->connect(DBI:mysql;$database", $user, $password); ############################################################ my $dbh = DBI->connect("DBI:mysql:database=cctvimages; host=localhost" +, "xxxx", "xxx", {'RaiseError' => 1}); ############################################################ # Insert the image_name, image_size and the image_date_modified to ima +geheader table# # with the values from renamed images coming from /home/me/images/ + # ############################################################ $statement = "INSERT INTO imageheader (image_name, image_size, image_date_modified) VALUES ('$image_name', '$image_size', '$image_date_modified')"; $sth = $dbh->prepare($statement) or die "Can't prepare $statement: " . + $dbh->errstr . "\n"; $sth->execute or die "Can't execute the query: " . $dbh->errstr . "\n" +; $sth->finish; $dbh->disconnect();
Regards,
Mel

20030308 Edit by Corion: Added CODE tags, blanked out login and password

Replies are listed 'Best First'.
Re: Script to insert image information into MySQL
by chromatic (Archbishop) on Mar 08, 2003 at 18:53 UTC
Re: Script to insert image information into MySQL
by pg (Canon) on Mar 08, 2003 at 20:06 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://241413]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (6)
As of 2022-12-06 00:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?