Merge branch 'eval-code'

diff --cc README
index 1d55870,98e7ad1..a8f26d5
--- 1/README
--- 2/README
+++ b/README
@@@ -54,14 -54,7 +54,14 @@@ array of values if you are creating ne
  
  * generate century column from year
  
-   foreach my $year ( @{ $rec->{Year} } ) {
-     push @{ $rec->{century} }, int($year/100)+1;
+   foreach my $year ( @{ $row->{Year} } ) {
+     push @{ $row->{century} }, int($year/100)+1;
    }
  
 +* modify existing column
 +
 +  foreach ( @{ $rec->{'Cited Author'} } ) {
 +    s/^\.+//;
 +    $_ = uc $_; # assigment is needed to modify value!
 +  }
 +