Baheeg Training and Test Exam

Question 1: What is the output of the following code?

sub my_sub {
    my $ref = shift;
    $$ref += 1;
}
my $var = 5;
my_sub(\$var);
print $var;