Sponsored Content
Full Discussion: If not ...then
Top Forums Shell Programming and Scripting If not ...then Post 98992 by sabercats on Monday 13th of February 2006 05:59:54 PM
Old 02-13-2006
If not ...then

Hi all,

Hi have a flat file and at 19 fields , separate by a comma ,
here are colummn field 19

FE-Router:MN-Menu:SV-SvcMenu:SV-SvcStop:AC-Lkup:AC-StNumQry:AC-Elig:SV-GetZipCode:SV-GetAddress:SV-GetSecondary:SV-ConfStreetAddress:FE-XferCSR

or

FE-Router:MN-Menu:BP-FinStatus:AC-Lkup:AC-PhNumLkup:AC-AcNumLkup:AC-StNumQry:AC-Elig:BP-FinStatus2:BP-OtherPymt:FE-XferCSR

or

FE-Router:OR-Menu1

===============
How do I collect the list that does not start with 'FE' or 'MN' (entries are separated by a colon) .
If you look at then the answer is location=SV-SvcMenu

If you look at then the answer is location=BP-FinStatus

If you look at then the answer is location=OR-Menu1

This drive me crazy , can you show me how to solve it in ksh? I will use location to send out put to another new flat file
example:

Date|name|Location|Doc|...
Thanks,

Last edited by sabercats; 02-13-2006 at 07:28 PM..
 
pods::SDL::Color(3pm)					User Contributed Perl Documentation				     pods::SDL::Color(3pm)

NAME
SDL::Color - Format independent color description CATEGORY Core, Video, Structure SYNOPSIS
my $black = SDL::Color->new(0, 0, 0); my $color = SDL::Color->new(255, 0, 0); my $r = $color->r; # 255 my $g = $color->g; # 0 my $b = $color->b; # 0 $color->g(255); $color->b(255); # $color is now white DESCRIPTION
"SDL_Color" describes a color in a format independent way. METHODS
new my $color = SDL::Color->new(255, 0, 0); The constructor creates a new color with the specified red, green and blue values. r my $r = $color->r; $color->r(128); If passed a value, this method sets the red component of the color; if not, it returns the red component of the color. g my $g = $color->g; $color->g(128); If passed a value, this method sets the green component of the color; if not, it returns the green component of the color. b my $b = $color->b; $color->b(128); If passed a value, this method sets the blue component of the color; if not, it returns the blue component of the color. SEE ALSO
SDL::Surface AUTHORS
See "AUTHORS" in SDL. perl v5.14.2 2012-05-28 pods::SDL::Color(3pm)
All times are GMT -4. The time now is 04:15 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy