Assuming you mean you want to assign the first three elements of @stuff to three new scalars:

my ( $new0, $new1, $new2 ) = @stuff;
[download]