$self->{returned_assets} = \@assets;
    $self->{returned_asset_ids} = \@asset_ids;

    my $assets_ref = \@assets;

    print Dumper $self->{returned_assets};
    for (my $i = 0 ; $i <= $#assets; $i++) {
        print $log "returned_asset = $assets[$i]\n";
    }

    for (my $j = 0 ; $j <= $#$assets_ref; $j++) {
        print $log "returned_asset_ref = $assets_ref->[$j]\n";
    }

    foreach $k(@$assets_ref) {
        print $log "returned_asset_ref2 = $k \n";
    }

    print $log "s->r_a->0 = $self->{returned_assets}->[0]\n";
    for $l(@{$self->{returned_assets}}) {
        print "L = $l\n";
    }