fork download
copy 
  1. set text {56 ipv4 packets transmitted and 20 ipv6 packets transmitted}
  2. set results [regexp -inline -all {\y\d+\y} $text]
  3. puts $results
  4. # 56 20
  5.  
  6. set results2 [regexp -inline -all {\m\d+\M} $text]
  7. puts $results2
  8. # 56 20
Success #stdin #stdout 0s 5272KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
56 20
56 20
https://ideone.com/MgXOIS
language:
TCL (tcl 8.6)
created:
5 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!