use v5.36;

sub f ($x, $y = 123) {
  say "The first argument is $_[0]";
}