$pdata |= ~$png->wbmp($_) foreach (@col);