Guest User

Untitled

a guest
May 28th, 2018
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.65 KB | None | 0 0
  1. sed 's/[^,]//g'
  2.  
  3. sed ':a; s/,/n/6; P; D; ta' roll.txt
  4.  
  5. sed ':a; s/,/n/6; P; D; ta' roll.txt
  6. '123456789','987651234','129873645','213456789','987612345','543216789'
  7. '432156789','876543291','213465789','542637819','123456','23456'
  8. '22234','3456','7890543','34567891,'2345','567'
  9.  
  10. perl -MText::CSV -ne '
  11. BEGIN{$p = Text::CSV->new()}
  12. @fields = $p->fields() if $p->parse($_);
  13. do {
  14. print join ",", splice @fields, 0, 6; print "n";
  15. } while @fields
  16. ' roll.txt
  17. '123456789','987651234','129873645','213456789','987612345','543216789'
  18. '432156789','876543291','213465789','542637819','123456','23456'
  19. '22234','3456','7890543','34567891,'2345','567'
Add Comment
Please, Sign In to add comment