unpack(q!A3x3!x89,$_);

# here is the equivalent:
# The use of 'x3' confuses me, but I know that this creates
# a list of 89 elements, each 3 characters long (numbers)
unpack("A3x3" x 89, $_);