Mode:
Duration:
1
2
3
4
5
6
7
8
9
10
11
my $level = 1;
sub updateUI { my ($level) = @_; print "Level: $level\n"; }
sub nextLevel { $level++; updateUI($level); }
sub resetLevel { $level = 1; updateUI($level); }
# Simulate actions
updateUI($level);
nextLevel();
nextLevel();
resetLevel();Coding works best on desktop or with an external keyboard.