Select Code to Download

#!/usr/bin/perl -w
use strict;
...

*First_col = 100
    100 does not exit, query failed