Select Code to Download

#!/usr/bin/env perl -l

...
    # Output header names
    print join "\n" => @header_names;
}

------------------------------------------------------------
Iteration {Applied Field} {Total Energy} Mx
...
{blaa blaa blaa}
------------------------------------------------------------
blaa blaa blaa

------------------------------------------------------------
Iteration {Applied Field}  {Total Energy}    Mx
...
Foo
  a b   c d  
Mx