# You can change the quote character using the # qq operator (there is an equivalent q operator # for use when you want to replace single quotes print qq' ... '; # You can use any character after qq and things # that logically pair like () or {} can be used: print qq{ ... }; # Or you can use a here document to include a chunk # of stuff. The double quotes tell it to allow # interpolation. Note you can replace EOF with # anything you want, but it must appear at the # start of a line and there must be nothing # following it on the line. print <<"EOF"; ... EOF ##

##

# Up at the top
my @image = ('HSDIT001.jpg', 'HSDIT002.jpg', 'HSDIT003.jpg', ...);

# Then down in your page body in the table cell you
# wanted the image in: