Advertisement
Guest User

Untitled

a guest
Jan 14th, 2016
67
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 6 0.12 KB | None | 0 0
  1. use strict;
  2.  
  3. "123 abc 456 foo 789 bar 000 foobar" ~~ m:g,(<alpha>+),;
  4. for $/.values
  5. {
  6.     #~$_.say;
  7.     say ~$_;
  8. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement