Advertisement
Guest User

Untitled

a guest
Mar 8th, 2021
59
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. for @xindices -> $ind {
  2. my ($x ,$y1,$y2) = $ind ~~ /^ (\d+) ':' (\d+) '_' (\d+) $/;
  3. printf("x: %d,y1: %d,y2: %d\n",$x,$y1,$y2);
  4. }
  5.  
Advertisement
RAW Paste Data Copied
Advertisement