Hi,
 Sorry for trouble.
Input file:
##############################
CADItem;56500000001295;A4;IMAN_specification;TIFFDrawing;56500000001295_dr01
;tif;56500000001295_dr01.tif
CADItem;56500000001295;A4;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
images_preview.qaf
CADItem;56500000001295;A4;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
qafmetadata.qaf
CADItem;56500000001295;A4;IMAN_specification;UGMASTER;56500000001295-A1;prt;
56500000059898_A1.prt
CADItem;56500000001295;A4;IMAN_specification;UGPART;56500000001295_dr01;qaf;
dwg_sht1.qaf
CADItem;56500000001295;A4;IMAN_specification;UGPART;56500000001295_dr01;qaf;
qafmetadata.qaf
CADItem;56500000001295;A4;IMAN_specification;UGPART;56500000001295_dr01;prt;
56500000001295_dr01.prt
CADItem;56500000001295;A2;IMAN_specification;TIFFDrawing;56500000001295_dr01
;tif;56500000001295_dr01.tif
CADItem;56500000001295;A2;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
images_preview.qaf
CADItem;56500000001295;A2;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
qafmetadata.qaf
CADItem;56500000001295;A2;IMAN_specification;UGMASTER;56500000001295-A1;prt;
56500000059898_A1.prt
CADItem;56500000001295;A2;IMAN_specification;UGPART;56500000001295_dr01;qaf;
dwg_sht1.qaf
CADItem;56500000001295;A2;IMAN_specification;UGPART;56500000001295_dr01;qaf;
qafmetadata.qaf
CADItem;56500000001295;A2;IMAN_specification;UGPART;56500000001295_dr01;prt;
56500000001295_dr01.prt
CADItem;56500000001295;A5;IMAN_specification;TIFFDrawing;56500000001295_dr01
;tif;56500000001295_dr01.tif
CADItem;56500000001295;A5;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
images_preview.qaf
CADItem;56500000001295;A5;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
qafmetadata.qaf
CADItem;56500000001295;A5;IMAN_specification;UGMASTER;56500000001295-A1;prt;
56500000059898_A1.prt
CADItem;56500000001295;A5;IMAN_specification;UGPART;56500000001295_dr01;qaf;
dwg_sht1.qaf
CADItem;56500000001295;A5;IMAN_specification;UGPART;56500000001295_dr01;qaf;
qafmetadata.qaf
CADItem;56500000001295;A5;IMAN_specification;UGPART;56500000001295_dr01;prt;
56500000001295_dr01.prt
CADItem;56500000001295;A3;IMAN_specification;TIFFDrawing;56500000001295_dr01
;tif;56500000001295_dr01.tif
CADItem;56500000001295;A3;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
images_preview.qaf
CADItem;56500000001295;A3;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
qafmetadata.qaf
CADItem;56500000001295;A3;IMAN_specification;UGMASTER;56500000001295-A1;prt;
56500000059898_A1.prt
CADItem;56500000001295;A3;IMAN_specification;UGPART;56500000001295_dr01;qaf;
dwg_sht1.qaf
CADItem;56500000001295;A3;IMAN_specification;UGPART;56500000001295_dr01;qaf;
qafmetadata.qaf
CADItem;56500000001295;A3;IMAN_specification;UGPART;56500000001295_dr01;prt;
56500000001295_dr01.prt
CADItem;56500000001295;A1;previous_TIFF;TIFFDrawing;56500000001295_dr01;tif;
56500000001295_dr01.tif
CADItem;56500000001295;A1;IMAN_specification;TIFFDrawing;56500000001295_dr01
;tif;56500000001295_dr01.tif
CADItem;56500000001295;A1;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
images_preview.qaf
CADItem;56500000001295;A1;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
qafmetadata.qaf
CADItem;56500000001295;A1;IMAN_specification;UGMASTER;56500000001295-A1;prt;
56500000059898_A1.prt
CADItem;56500000001295;A1;IMAN_specification;UGPART;56500000001295_dr01;qaf;
dwg_sht1.qaf
CADItem;56500000001295;A1;IMAN_specification;UGPART;56500000001295_dr01;qaf;
qafmetadata.qaf
CADItem;56500000001295;A1;IMAN_specification;UGPART;56500000001295_dr01;prt;
56500000001295_dr01.prt
CADItem;56500000001295;A6;IMAN_specification;TIFFDrawing;56500000001295_dr01
;tif;56500000001295_dr01.tif
CADItem;56500000001295;A6;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
images_preview.qaf
CADItem;56500000001295;A6;IMAN_specification;UGMASTER;56500000001295-A1;qaf;
qafmetadata.qaf
##############################################

I have to tokenize each string and get item and
revision(ex:56500000001295;A4)

Output like:
################
56500000001295;A4 
56500000001295;A2
56500000001295;A5
56500000001295;A3
56500000001295;A1
56500000001295;A6

So I want each line should be unique. No multiple entries.
I hope this can help for understanding.

Thanks and Regards
Reddy

-----Original Message-----
From: Nathan Haigh [mailto:[EMAIL PROTECTED] 
Sent: 27 February 2007 09:28
To: Beri Veera-ext, Reddy
Cc: ActivePerl
Subject: [RMX:#] Re: [RMX:#] Re: [RMX:#] Re: [RMX:#] Re: How to compare two
files and update t o second fil e

Beri Veera-ext, Reddy wrote:
>  Hi,
>   Thanks for your information. I want output like this only. If I have
> multiple lines I should take first line only.
>
> Thanks and Regards
> Reddy
>
>   

I am still not clear what you want as your final output file! Please,
please clarify with an example output file!

_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to