Select Code to Download

my $data = $response->decoded_content;
# doing what should be a "no-op", below, makes the problem
# dissappear.
$data=substr($data,0);

# doesn't work
$data=~/^(.*)$/;
$data=$1;

# pass $newvar on instead of $data...doesn't work
my $newvar=$data