Get the number of columns of table on which trigger has invoked

Hi,

Could anyone please tell me how to get the number of columns and their names of tables on which trigger has invoked? I wrote function in Perl.

Thanks,
Jignesh