Re^6: Parsing Guassian '03 Log Files


good chemistry is complicated, and a little bit messy -LW
	PerlMonks

Re^6: Parsing Guassian '03 Log Files

by Andrew_Levenson (Hermit)

on Jan 31, 2008 at 21:31 UTC ( [id://665452]=note: print w/replies, xml )

Need Help??

in reply to Re^5: Parsing Guassian '03 Log Files
in thread Parsing Guassian '03 Log Files

Ooh, @array = ();? Nice. Yeah, I completely forgot how to empty an array, so I... made my own way. I guess we know now why I'm a chemistry major now instead of Computer Science, haha.

If its okay, i'm going to test your script and replace mine in the bin? Or not, I'll figure it out when I get back to the lab.
Again, thanks.




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^6: Parsing Guassian '03 Log Files Select or Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://665452]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others chilling in the Monastery: (4)

As of 2024-04-23 07:31 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found