This perl script uses ImageMagick to convert the first page of a directory structure of pdf’s into a 600 pixel wide png thumbnail. The [0] in file.pdf[0] means to convert only the first page.
#!/usr/bin/perl -w use strict; my $tmp = `find . -iname '*.pdf'`; print "$tmp\n"; my @files = split(/\n/, "$tmp"); foreach my $file (@files) { my $outfile = "${file}.png"; if (! -f $outfile) { my $command = "convert -thumbnail 600 '$file\[0\]' '$file.png'\n"; print $command; `$command` } else { print "$outfile already exists\n"; } }