# Both methods SHOULD (in my opinion) yield the same results

# METHOD 1 -
# proper function with scalar
$alpha = "Text before change in method 1";
$beta = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, and it does (as is apparent from the print that follows);
$$beta = "Text after change in method 1";
print "$alpha\n";

# METHOD 2 -
# improper function with array/list
$alpha = "Text before change in method 2";
$beta[0] = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, but it does not.
$$beta[0] = "Text after change in method 2";
print "$alpha\n";

# Both methods SHOULD (in my opinion) yield the same results

# METHOD 1 -
# proper function with scalar
$alpha = "Text before change in method 1";
$beta = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, and it does (as is apparent from the print that follows);
$$beta = "Text after change in method 1";
print "$alpha\n";

# METHOD 2 -
# improper function with array/list
$alpha = "Text before change in method 2";
$beta[0] = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, but it does not.
$$beta[0] = "Text after change in method 2";
print "$alpha\n";

# Both methods SHOULD (in my opinion) yield the same results

# METHOD 1 -
# proper function with scalar
$alpha = "Text before change in method 1";
$beta = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, and it does (as is apparent from the print that follows);
$$beta = "Text after change in method 1";
print "$alpha\n";

# METHOD 2 -
# improper function with array/list
$alpha = "Text before change in method 2";
$beta[0] = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, but it does not.
$$beta[0] = "Text after change in method 2";
print "$alpha\n";

# Both methods SHOULD (in my opinion) yield the same results

# METHOD 1 -
# proper function with scalar
$alpha = "Text before change in method 1";
$beta = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, and it does (as is apparent from the print that follows);
$$beta = "Text after change in method 1";
print "$alpha\n";

# METHOD 2 -
# improper function with array/list
$alpha = "Text before change in method 2";
$beta[0] = "alpha";

# the following assignment really reads $"alpha" so it should assign a value
# to $alpha, but it does not.
$$beta[0] = "Text after change in method 2";
print "$alpha\n";