Select Code to Download

LOAD DATA
INFILE <table>.txt
INTO TABLE <table>
...
  surname        POSITION(10:34)        CHAR(25)
  given_names        POSITION(35-59)        CHAR(25)
)

#!/usr/bin/perl

...
  }
}
closedir(DIR);