Re^2: Parsing Guassian '03 Log Files

That's fantastic, thank you. I'll test and tinker with it when I get to the lab tomorrow, see if I can't devise some solution of my own given your guidance.




C(qw/74 97 104 112/);sub C{while(@_){$c**=$C;print
(map{chr($C!=$c?shift:pop)}$_),$C+=@_%2!=1?1:0}}
[download]

Comment on Re^2: Parsing Guassian '03 Log Files Download Code