[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Omaha.pm] Another one-liner - whack a database unload


PROBLEM

Given a file, orphan.unl, that looks like this:

>head -3 orphan.unl
11832|704402|PARKWE|L|GNRMSG||1004792774||DMC|2005-03-29 10:50:04.37500|0|0|PRO-PARKWEACT-1004792774TYP-FINO-1STA-ATOP-FLAG MESSAGEFLG-20050329000000TXT-REQ: RQ NSRM KING TA RATE:FDT-20050328101854FCL-LAJONEXDT-XCL-TOW-CIP-CBP-PLC-WCA-RTC-URG- NCLN-CLO-CPH-EDT-20050330000000DEP-| 11834|704402|PARKWE|L|GNRSPE||1004792774||DMC|2005-03-29 10:50:05.32800|0|0|PRO-PARKWEACT-1004792774ITN-1COD-S2FRD -20050329000000TOD-20050330000000AMT-0STA-C| 11840|704402|PARKWE|L|GNRSPE||1004792774||DMC|2005-03-29 10:50:07.29600|0|0|PRO-PARKWEACT-1004792774ITN-2COD-KINGFRD -20050329000000TOD-20050330000000AMT-0STA-C| 

Turn the leading digits into a single 0.

SOLUTION

>cat orphan.unl | perl -ne "s/^\d+/0/; print" > orphan_new.unl

All done. Observe:

>head -3 orphan_new.unl
0|704402|PARKWE|L|GNRMSG||1004792774||DMC|2005-03-29 10:50:04.37500|0|0|PRO-PARKWEACT-1004792774TYP-FINO-1STA-ATOP-FLAG MESSAGEFLG-20050329000000TXT-REQ: RQ NSRM KING TA RATE:FDT-20050328101854FCL-LAJONEXDT-XCL-TOW-CIP-CBP-PLC-WCA-RTC-URG- NCLN-CLO-CPH-EDT-20050330000000DEP-| 0|704402|PARKWE|L|GNRSPE||1004792774||DMC|2005-03-29 10:50:05.32800|0|0|PRO-PARKWEACT-1004792774ITN-1COD-S2FRD -20050329000000TOD-20050330000000AMT-0STA-C| 0|704402|PARKWE|L|GNRSPE||1004792774||DMC|2005-03-29 10:50:07.29600|0|0|PRO-PARKWEACT-1004792774ITN-2COD-KINGFRD -20050329000000TOD-20050330000000AMT-0STA-C| 

>wc -l orphan*
     899 orphan.unl
     899 orphan_new.unl

Yay!
What's the point? orphan.unl was a database unload, and we needed to set the serial/autonumber column (the first column) value to 0 on every row so the database would assign the ID automatically. 

j