fork download
copy 
  1. #!/bin/bash
  2.  
  3. awk -v RS='s' -v FS='r' -v ORS='' -v OFS='r' \
  4.     'NR != 1 { 
  5.     	string = ""; 
  6.     	split($1, numbers," "); 
  7.  
  8.     	numbers[3] = NF - 1; 
  9.     	for(i in numbers) string = string " " numbers[i]; 
  10.  
  11.     	$1 = string "\n"; 
  12.     	print "s" $0
  13.     }'
Success #stdin #stdout 0.01s 5360KB
comments ()
stdin
copy 
s 0.01 0 0 -1 0
r 0.1 0 0 1.218 0.01
r 0.15 0 0 1.214 0.01
r 0.2 0 0 1.213 0.01
s 1.01 0 0 -1 0
r 0.05 0 0 1.159 0.01
r 0.1 0 0 1.127 0.01
r 0.15 0 0 1.106 0.01
r 0.2 0 0 1.115 0.01
r 0.25 0 0 1.107 0.01
stdout
copy 
s 0.01 0 3 -1 0
r 0.1 0 0 1.218 0.01
r 0.15 0 0 1.214 0.01
r 0.2 0 0 1.213 0.01
s 1.01 0 5 -1 0
r 0.05 0 0 1.159 0.01
r 0.1 0 0 1.127 0.01
r 0.15 0 0 1.106 0.01
r 0.2 0 0 1.115 0.01
r 0.25 0 0 1.107 0.01
https://ideone.com/AMyp2I
language:
Bash (bash 5.0.3)
created:
1 year ago
visibility:
secret

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!