Select Code to Download

#!/usr/bin/perl 
use strict;
...
   categories => '=Sheet1!$A$1:$A$'.$rx,  
   values     => '=Sheet1!$B$1:$B$'.$rx,
);