Create a series of incrementing numbers in vim

:.,$!perl -pne 'for $i ("0001".."0004"){ s/XXXX/$i/ if($i == $.) }'
given lines of the form 123|XXXX|1000 ... 123|XXXX|1011 each 'XXXX' will be replaced with a serial number between 0001 and 0004.
Sample Output
123|XXXX|1000
123|XXXX|1001
123|XXXX|1010
123|XXXX|1011
---
123|0001|1000
123|0002|1001
123|0003|1010
123|0004|1011

0
By: bartonski
2010-02-11 03:56:26

These Might Interest You

  • Calculate pi from the infinite series 4/1 - 4/3 + 4/5 - 4/7 + ... This expansion was formulated by Gottfried Leibniz: http://en.wikipedia.org/wiki/Leibniz_formula_for_pi I helped rubenmoran create the sum of a sequence of numbers and he replied with a command for the sequence: 1 + 2 -3 + 4 ... This set me thinking. Transcendental numbers! seq provides the odd numbers 1, 3, 5 sed turns them into 4/1 4/3 4/5 paste inserts - and + bc -l does the calculation Note: 100 million iterations takes quite a while. 1 billion and I run out of memory. Show Sample Output


    0
    seq 1 2 99999999 | sed 's!^!4/!' | paste -sd-+ | bc -l
    flatcap · 2011-02-09 23:36:07 3
  • Identify Movies but NOT TV Series using find and regex While it's easy to find video files, it's not easy to check wheter they are Movies or part of TV Series; this could be important if you need to move files before cataloguing them. Using Regex this could become possibile. Normally TV Series are names with Season and Episode numbers in the file name, this way: "X-Files S01E12 - Gna gna gna.avi" or "3x04.Falling.Skies.-.The.Revenge.mkv" and so on. This RegEx will find correct Episodes if they have the structure "S00E00" or "0E00" or "S00x00" or "0x00". Inversing RegEx makes the trick to find out Movies.


    0
    find . -type f -regextype posix-extended ! -regex '^.*[S|s|\.| ]{0,1}[0-9]{1,2}[e|x][0-9][0-9].*\.(avi|mkv|srt)$' \( -iname "*.mkv" -or -iname "*.avi"-or -iname "*.srt" \)
    marcolino · 2017-05-08 10:56:21 0
  • While it's easy to find video files, it's not easy to check wheter they are Movies or part of TV Series; this could be important if you need to move files before cataloguing them. Using Regex this could become possibile. Normally TV Series are names with Season and Episode numbers in the file name, this way: "X-Files S01E12 - Gna gna gna.avi" or "3x04.Falling.Skies.-.The.Revenge.mkv" and so on. This RegEx will find correct Episodes if they have the structure "S00E00" or "0E00" or "S00x00" or "0x00". In case you should need to find Movies but NOT TV Series, you have to inverse the RegEx when finding video files: find . -type f -regextype posix-extended ! -regex '^.*[S|s|\.| ]{0,1}[0-9]{1,2}[e|x][0-9][0-9].*\.(avi|mkv|srt)$' \( -iname "*.mkv" -or -iname "*.avi"-or -iname "*.srt" \)


    0
    find . -type f -regextype posix-extended -regex '^.*[S|s|\.| ]{0,1}[0-9]{1,2}[e|x][0-9][0-9].*\.(avi|mkv|srt)$'
    marcolino · 2017-05-08 10:16:07 0
  • Calculating series with awk only, no need for seq: add numbers from 1 to 100 Variations: 1+3+...+(2n-1) = n^2 awk 'BEGIN {for(i=1;i<=19;i+=2)sum+=i}; END {print sum}' /dev/null # displays 100 1/2 + 1/4 + ... = 1 awk 'BEGIN {for(i=1;i<=10;i++)sum+=1/(2**i)}; END {print sum}' /dev/null # displays 0.999023 Show Sample Output


    0
    awk 'BEGIN {for(i=1;i<=100;i++)sum+=i}; END {print sum}' /dev/null
    dennisw · 2009-10-26 18:24:57 0

What Others Think

That doesn't work for me. If I want to print numbers : :.!printf '\%s\n' {0..100}
sputnick · 436 weeks and 2 days ago
Sputnick, The point of my command isn't just creating a series of numbers, but also replacing all occurrences of 'XXXX' within a selected text area in vim with serial numbers. What happens when you run this: echo "fooXXXXbar" | perl -pne 'for $i ("0001".."0004"){ s/XXXX/$i/ if($i == $.) }'
bartonski · 436 weeks and 2 days ago
foo0001bar but the part I don't understand is the beginning : ".,$!" I can't type that in vim ! In general, a vil command start with ":"
sputnick · 436 weeks and 2 days ago
Right. Paste the command in after ':'. ".,$!" means 'from the current line to the end of the file'. Strictly speaking, the command should look like <esc>:.,$!perl -pne 'for $i ("0001".."0004"){ s/XXXX/$i/ if($i == $.) }'
bartonski · 436 weeks and 2 days ago
Added initial ':' to command.
bartonski · 436 weeks and 2 days ago

What do you think?

Any thoughts on this command? Does it work on your machine? Can you do the same thing with only 14 characters?

You must be signed in to comment.

What's this?

commandlinefu.com is the place to record those command-line gems that you return to again and again. That way others can gain from your CLI wisdom and you from theirs too. All commands can be commented on, discussed and voted up or down.

Share Your Commands



Stay in the loop…

Follow the Tweets.

Every new command is wrapped in a tweet and posted to Twitter. Following the stream is a great way of staying abreast of the latest commands. For the more discerning, there are Twitter accounts for commands that get a minimum of 3 and 10 votes - that way only the great commands get tweeted.

» http://twitter.com/commandlinefu
» http://twitter.com/commandlinefu3
» http://twitter.com/commandlinefu10

Subscribe to the feeds.

Use your favourite RSS aggregator to stay in touch with the latest commands. There are feeds mirroring the 3 Twitter streams as well as for virtually every other subset (users, tags, functions,…):

Subscribe to the feed for: