This reads like the infamous make-my-homework request. You might have more success when also providing a short version of the Perl code you're currently using (that survives perl -c, which @colname={colname1,colname3} probably won't (excluding subs)).

Darn it, should have checked once more before pressing create; such a tempting opener, and I was too slow...