Shell Programming and Scripting

Thanks, Chubler_XL. This works nearly perfectly, except that there's more than one dash in the entries.

This would be one line:
E4-Z61-7393486-001.jpg

Buy I can just compare $1, $2 and $3.

---------- Post updated at 12:36 PM ---------- Previous update was at 12:16 PM ----------

Finally, and for lack of a better version, this is what I've used, and it works:

Code:

nawk 'BEGIN {FS="[-.]"} $(NF-1)==n&&$1==a&&$2==b&&$3==c {print f}; {n=$(NF-1)+1; a=$1;b=$2;c=$3;f=$0}' kk

Thank you very much for your help, guys.

This might be a little more robust as it supports any number of dashes:

Code:

nawk 'BEGIN {FS="[-.]"} {b=$0; sub(/\-[0-9][0-9]*.[^.]*/, "", b);} $(NF-1)==n&&b==a {print f}; {n=$(NF-1)+1; a=b;f=$0;}' kk

Hmmm, I don't get your substitution. Let's see:
\- -> A slash
[0-9] -> A number
[0-9]* -> Zero or more numbers
. -> Any character
[^.]* -> Zero or more characters that are not a dot

And then you clear it? Am I misunderstanding this? When I try the sub in the test name I gave, it just turns:
E4-Z61-7393486-001.jpg
into:
E4-Z61.jpg
by removing the substring:
-7393486-001

I believe you might have wanted to remove from "b" the substring -001? Maybe then we could use as a regexp:

Code:

/\-[0-9][0-9][0-9]\./

Thanks, I actually wanted to remove from "b" the substring -001.jpg so correct code is (change shown in red):

Code:

nawk 'BEGIN {FS="[-.]"} {b=$0; sub(/\-[0-9][0-9]*\.[^.]*/, "", b);} $(NF-1)==n&&b==a {print f}; {n=$(NF-1)+1; a=b;f=$0;}' kk