- or download this
my( $var1, $var2 ) = (
subroutine0_with_return_value(),
subroutine1_with_return_value()
);
- or download this
my $var1 = sub_w_ret_val1();
my $var2 = sub_w_ret_val2();
- or download this
public static void main(){
int var1, var2;
...
var1 = sub_w_ret_val();
var2 = sub_w_ret_val();
}
- or download this
my $file1, $file2
my $var1, $var2
$var1 = &sub_w_ret_val();
$var2 = &sub_w_ret_val();