in reply to Re: Parsing Guassian '03 Log Files
in thread Parsing Guassian '03 Log Files
Thank you very much, but unfortunately, I need it to work in such a way that I call the script/program, feed it an input filename and an output filename, and have it work its magic. Each file is of an undetermined length, with sections that need to be parsed f undetermined length, as each file represents a different chain-length of the molecule.
Sorry that I didn't specify that earlier.
Sorry that I didn't specify that earlier.
C(qw/74 97 104 112/);sub C{while(@_){$c**=$C;print (map{chr($C!=$c?shift:pop)}$_),$C+=@_%2!=1?1:0}}
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: Parsing Guassian '03 Log Files
by GrandFather (Saint) on Jan 31, 2008 at 02:34 UTC | |
by Andrew_Levenson (Hermit) on Jan 31, 2008 at 06:17 UTC | |
by Andrew_Levenson (Hermit) on Jan 31, 2008 at 20:01 UTC | |
by GrandFather (Saint) on Jan 31, 2008 at 20:25 UTC | |
by Andrew_Levenson (Hermit) on Jan 31, 2008 at 21:31 UTC |
In Section
Seekers of Perl Wisdom