Select Code to Download

   my (undef, $name, undef, $size) = split /\t/;

   my ($id, $name, $effects, $size) = split /\t/;