How to filter out major and minor?

Shell Programming and Scripting
1

Hi,

I have line like this :

proj_name/module/trunk/module_1_0

where the first "1" refers to major version and second "0" refers to minor version.

any AWK or command like that so that I can filter out the major and minor ?

like major= command | input line
minor= command | input line
on executing the value would be,

major=1
minor=0

Thanks in advance.
Regards,
Bhaskar

2

try..

root# echo $x
proj_name/module/trunk/module_1_0
root# major=`basename $x | cut -d "_" -f2`
root# minor=`basename $x | cut -d "_" -f3`
root# echo "Major = $major"
Major = 1
root# echo "Minor = $minor"
Minor = 0
#

or

root# cat list
proj_name/module/trunk/module_1_0
proj_name/module/trunk/module_2_3
proj_name/module/trunk/module_3_4
root#
 
root# cat list | while read file
> do
> major=`basename $file | cut -d "_" -f2`
> minor=`basename $file | cut -d "_" -f3`
> echo "$file - Major = $major - Minor = $minor"
> done
proj_name/module/trunk/module_1_0 - Major = 1 - Minor = 0
proj_name/module/trunk/module_2_3 - Major = 2 - Minor = 3
proj_name/module/trunk/module_3_4 - Major = 3 - Minor = 4
3

Voil�:

major = `awk -F"_" {print $(NF - 1)} <<< "proj_name/module/trunk/module_1_0"`
minor = `awk -F"_" {print $NF} <<< "proj_name/module/trunk/module_1_0"`

Regards.

4 
echo proj_name/module/trunk/module_1_0 | perl -nle '{if (/.*_(\d+)_(\d+)/) {print "major=$1\nminor=$2"}}'
5

Many Thanks to all of you for such an overwhelming response.

Regards,
Bhaskar