Потрібен такий скрипт...

[v.2.1]

Потрібен скрипт, в який можна ввести довільне літеро-цифрове значення і вказати які числа збільшувати на +1 до певної кількості та вивести всі нові значення.
Наприклад site09600001df.com
Потрібно отримати  site09600002df.com
і так далі, до site09601000df.com

Буду дуже вдячний, і в знак цього відішлю вам поповнення на ваш мобільний на 40 гривень.

[kisil]

А куди вивести нові значення??

[peinguin]

https://www.google.com/search?q=perl+rexexp&ie=utf-8&oe=utf-8&client=ubuntu&channel=fs#hl=ru&client=ubuntu&hs=tyj&channel=fs&sa=X&ei=Yy4cUPCuNvLc4QTPyYCoCw&ved=0CHAQvwUoAQ&q=perl+regexp&spell=1&bav=on.2,or.r_gc.r_pw.r_cp.r_qf.&fp=4a1ac688b1214aef&biw=1366&bih=605

[Михайло Даниленко]

Код: Bash

1. perl -e 'my ( $line, $iter ) = @ARGV; for ( my $i = 0; $i < $iter; $i ++ ) { $_ = $line; s/(\d+)/$1+$i/eg; print "$_\n" }' site9600001df.com 10

Код: Bash

1. for i in {1..10}; do printf "site960%04udf.com\n" "$i"; done

[tech]

Код: [Вибрати]

#!/bin/bash

usage="boostnum [-b <text before>] [-a <text after>] number [-i <increase by>]"

while getopts ":a:b:i:" opt; do
    case $opt in
        a )
            after="$OPTARG";;
        b )
            before="$OPTARG";;
        i )
            increase=$OPTARG;;
        \? )
            echo $usage
            exit 1;;
    esac
done

shift $(($OPTIND - 1))

if [ -z "$@" ]; then
    echo $usage
    exit 1
fi

number=$1
max_value=$(($number + increase + 1))

while [[ $number -lt $max_value ]]; do
    echo $before$((number++))$after
done


[peinguin]

perl -e 'my ( $line, $iter ) = @ARGV; for ( my $i = 0; $i < $iter; $i ++ ) { $_ = $line; s/(\d+)/$1+$i/eg; print "$_\n" }' site9600001df.com 10

for i in {1..10}; do printf "site960%04udf.com\n" "$i"; done

О, Великий.

[v.2.1]

Дуже дякую!
Потестую різні способи, думаю буде ще пару питань. Але поки все виглядає добре.

Зараз таке виникло. Як зробити, щоб ці дані друкувалися у файл і при новій операції додавалися до кінця? Бо в консоль вивід не влазить, та й гадаю так швидше було б.

[Михайло Даниленко]

Код: Bash

1. bla-bla >> output_file.txt

[v.2.1]

Ну, а щоб зовсім було круто! Підкажіть як скомандувати, щоб з input.file бралися дані по одному рядку і таким чином оброблялися?!

[Михайло Даниленко]

Код: Bash

1. perl -e 'my ( $iter ) = shift; while ( my $line = <> ) { for ( my $i = 0; $i < $iter; $i ++ ) { $_ = $line; chomp; s/(\d+)/$1+$i/eg; print "$_\n" } }' 10 < infile.txt >> outfile.txt

Код: Bash

1. while read format; do for i in {1..10}; do printf "$format\n" "$i"; done; done < infile.txt >> outfile.txt

[v.2.1]

Вибачте, трохи був заклопотаний і забув віддячити. Михайло Даниленко, напишіть мені в приват ваш телефон, щоб я міг переказати обіцяні кошти.

[Михайло Даниленко]

Вибачте, трохи був заклопотаний і забув віддячити. Михайло Даниленко, напишіть мені в приват ваш телефон, щоб я міг переказати обіцяні кошти.

Дякую, але пара рядків стандартних конструкцій того не варта
Якщо хочете, використайте їх на якусь благодійність.