You might add some error checking, just stick these two lines after the printerlist line

? "Error: " + @error
? "Number of printers: " + ubound($array) + 1

What do you get?