my $path = '/.snapshots123/yabsm/root/hourly/day=2021_03_04,time=21:20';
my @nums = $path =~ m|/day=(\d{4})_(\d{2})_(\d{2}),time=(\d{2}):(\d{2})|;

##</code><code>##

my $path = '/.snapshots123/yabsm/root/hourly/day=2021_03_04,time=21:20';
my ($end_of_path, @nums) =
  $path =~ m|/(day=(\d{4})_(\d{2})_(\d{2}),time=(\d{2}):(\d{2}))|;

##</code><code>##

use Data::Dump;
dd $end_of_path;
dd @nums;