title: Re-ordering columns with a Perl one-liner
body: <p>How do you reorganize this with one liner</p>
  
  <pre><code>foo  r1.1   abc
  foo  r10.1  pqr
  qux  r2.1   lmn
  bar  r33.1  xpq
  
  # In fact there could be more fields that preceeds column with "rxx.x".
  </code></pre>
  
  <p>Into this</p>
  
  <pre><code>r1.1  foo  abc
  r10.1 foo  pqr
  r2.1  qux  lmn
  r33.1 bar  xpq
  </code></pre>
  
  <p>Basically, put second column into the first and everything else that succeeds  it, after.</p>