8 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
so, the first line of bash, perl, python, ruby, and similar languages must contain the path to the interpreter...i.e. #!/bin/perl, or #!/bin/python. so in the case of a perl script, for instance, a perl script cannot and will never run if the perl program is not installed/present on the system. ... (9 Replies)
Discussion started by: SkySmart
9 Replies
2. Shell Programming and Scripting
The awk below using the sample input would output the following: Basically, it averages the text in $5 that matches if $7 < 30 .
awk '{if(len==0){last=$5;total=$7;len=1;getline}if($5!=last){printf("%s\t%f\n", last,... (6 Replies)
Discussion started by: cmccabe
6 Replies
3. Shell Programming and Scripting
Hi,
I have date format like 09/08/115(Format : date +%m%d%1y) and i want to differentiate this date with current date and output of difference will compare with a number like
if ; then
commands
else
exit
fi
how can i do that (2 Replies)
Discussion started by: charanarjun
2 Replies
4. Shell Programming and Scripting
file1:
A pass
B fail
E pass
file2:
B pass
A fail
E pass
if from file2 introduced new failure then, print failure
It should print: (1 Reply)
Discussion started by: yanglei_fage
1 Replies
5. Shell Programming and Scripting
nawk -F, 'NR==FNR{file=FILENAME;a++;next} a{if(FILENAME~file)next;b++;}
END{ for(i in a){if(a && !b){print "NEW: "i}} for(i in b){if(b)print i"\t\t"b}}' OFS=, 123.csv *.csv
I need to include 123.csv into the equation for the total output currently it compares whatever is on 123.csv against... (27 Replies)
Discussion started by: llcooljatt
27 Replies
6. Shell Programming and Scripting
Hello Everyone! I am somewhat new to Unix command line and don't have much experience to input on the matter so I wanted to gather some opinion's from people who have been down the road already.
Currently, I am going through a book by John Muster called "Unix Made Easy". I have gone... (2 Replies)
Discussion started by: budfoxcat
2 Replies
7. Red Hat
Hi Gurus,
Is there a way to tweak the date format in /var/log/secure (Fedora 11) so that it will have the same date format as in Fedora ver. 6-10.
For Fedora 11:
2010-01-24T07:32:03.767801+09:00 jump sshd: Failed password for root from 189.1.164.92 port 47662 ssh2... (3 Replies)
Discussion started by: linuxgeek
3 Replies
8. UNIX for Dummies Questions & Answers
Ok, heres the situation
I have a job interview next week and they use Solaris there for their networking.
I'm basically coming from a windows and novell background, I've been studying Solaris commands an such but I was wondering if someone can breakdown the main differences between windows and... (12 Replies)
Discussion started by: eloquent99
12 Replies
ZirePhoto(3pm) User Contributed Perl Documentation ZirePhoto(3pm)
NAME
Palm::ZirePhoto - Handler for Palm Zire71 Photo thumbnail databases.
SYNOPSIS
use Palm::ZirePhoto;
DESCRIPTION
The Zire71 PDB handler is a helper class for the Palm::PDB package. It parses Zire71 Photo thumbnail databases (and, hopefully, Tungsten
Photo databases). Actual photos are separate databases and must be processed separately.
This database is currently only capable of reading.
AppInfo block
The AppInfo block begins with standard category support. See Palm::StdAppInfo for details.
Records
Records may contain no data fields. This occurs when the record has been marked deleted on the Palm, presumably in order to save space
(Photo has no provision for archiving when deleting and the separate database storage for the actual images would make it pointless
anyways).
$record = $pdb->{records}[N]
$record->{'width'}
$record->{'height'}
$record->{'size'}
The actual JPEG images dimensions and (compressed) file size.
$record->{'thumb'}
The thumbnail is a very small (max size approx 84x84) JPEG format image.
$record->{'name'}
Image name. Appending ".jpg" to this will give the database name of the actual image data.
$record->{'time1'}
$record->{'time2'}
Unix epoch time of when the image was last modified ("time1") and when it was created ("time2").
Photo Databases
Actual photos are stored in separate databases. Each record is preceded by an 8 byte header that describes it a) as a data block (DBLK) and
b) the size of the block. Records are generally 4k, except for the last. To convert a Photo database to a JPEG image, one would do
something like:
use Palm::Raw;
my $pdb = new Palm::PDB;
$pdb->Load( "image.jpg.pdb" );
open F, ">image.jpg";
for( @{$pdb->{records}} ) {
print F substr($_->{'data'}, 8);
}
close F;
Notes are stored at the end of the JPEG image. Use "ParseNote" to get it.
METHODS
Handling Palm photos can be a bit complicated. Some helper methods are exported to make some special cases a bit easier.
ParseNote
my $photo = read_jpeg_file( "image.jpg" );
my $note = Palm::ZirePhoto::ParseNote($photo);
print "Note: $note" if defined $note;
The Palm photo application stores user notes at the end of the JPEG file itself. This method will extract that note and return it. "undef"
is returned if the note is unavailable.
ParseAlbum
my $album = slurp("/DCIM/Unfiled/Album.db");
my @records = Palm::ZirePhoto::ParseAlbum( $album );
print $_->{name},"
" for( @records );
Photos on memory cards are stored in subdirectories of "/DCIM". The meta-data for these images are stored in "Album.db" files under each
category directory. This method will parse out the meta-data into an array of records similar to those returned by "ParseRecord". Thumbnail
information, however, is not available.
SOURCE CONTROL
The source is in Github:
http://github.com/briandfoy/p5-Palm/tree/master
AUTHOR
Alessandro Zummo, "<a.zummo@towertech.it>"
Currently maintained by brian d foy, "<bdfoy@cpan.org>"
SEE ALSO
Palm::PDB(3)
Palm::StdAppInfo(3)
perl v5.10.1 2010-03-07 ZirePhoto(3pm)