Select Code to Download

$page_graphic->[$i]->{array} = [@array];

# ... other stuff ...

loop_construct {
...

}