my $newdata = [ shopping => \@item ];
    $_ = $newdata;