Solution for: #39: Reversing PDB files to PML
Use the Perl module EBook::Tools::EReader
- 
yliu on April 26, 2009, 02:47 PM UTC
Best solution so far is to
1. use CPAN to install EBook::Tools::EReader
2. Either use this sample code directly in a .pl file
3. or open up a Perl interactive debugger
and drop all the my declarations from the above snippet.
You can probably whip up a quick Perl script to do this directly and print to STDOUT. Too lazy today to write that code for just this single-use case.
1. use CPAN to install EBook::Tools::EReader
2. Either use this sample code directly in a .pl file
use EBook::Tools::EReader;
my $pdb = EBook::Tools::EReader->new();
$pdb->Load('myfile-er.pdb');
my $html = $pdb->html;
my $pml = $pdb->pml;
print $pml;3. or open up a Perl interactive debugger
perl -d -e 1and drop all the my declarations from the above snippet.
You can probably whip up a quick Perl script to do this directly and print to STDOUT. Too lazy today to write that code for just this single-use case.