Select Code to Download

#!/usr/bin/perl
use warnings;
...
# Code to log in removed

my $code = $tesco->product_search({ searchtext => $pn, extendedinfo =>
+ 'N' });

 
{
"StatusCode": 0,
...
]
}