Help for this page

Select Code to Download


  1. or download this
    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}
+)|;
  2. or download this
    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}))|;
  3. or download this
    use Data::Dump;
dd $end_of_path;
dd @nums;