Here is a simple ImageMagic script. Remember the IM docs say that vector formats like pdf, svg, eps, etc are not handled the best way possible by IM, see IM and vector formats

#!/usr/bin/perl
use warnings;
use strict;
use Image::Magick;

my $img = Image::Magick->new;

$img->Read('zzimage.pdf');

$img->Rotate(-90); #if portrait/lanscape causes problem

$img->set('magick'=>'eps');
$img->Write(filename=>'zzzzimage.eps');
__END__
[download]