I need to code the AES algorithm in Perl and I am particuarly stuck on the Mix Columns step. Any suggestions?

The psuedo code would be nice, or a detailed explanation of the logic in this algorithm. If you have all the details for the entire algorithm, that would be appreciated.