Doing work on a file.. Spliting up the file

I am clueless here. Any help would be greatly appreciated. Thanks so much -- Steven M. Klass Physical Design Manager National Semiconductor Corp 15210 S. 50th Street Suite 120, Mail Stop AZ4 Phoenix, AZ 85044 Ph:480-629-2503 Fax:480-629-2476 [EMAIL PROTECTED] http://www.nsc.com ; Pro

Multiline searching -

t to know where to do my search and replace (s/INFILE/TEST/). I hope someone can help me out. Thanks so much for your continued patience! Example Text ; Test ; Test *DESCRIPTION ; More comments INFILE = blach OUTFILE = test ; ; *ENDS ; ; *LAYERS LAYER=1 ; *ENDS ; -- Steven M. Klass

Re: If (/start/ .. /end/) Flip Flop Mechanism

don't find it add it. The output should be foo1 = bar1-1 foo2 = bar2-2 foo3 = bar3-3 foo4 = bar4-4 Any ideas On Sunday 03 March 2002 02:35 pm, Jeff 'japhy' Pinyan wrote: > On Mar 3, Todd A. Jacobs said: > >On Sat, 2 Mar 2002, Steven M. Klass wrote: &g

If (/start/ .. /end/) Flip Flop Mechanism

exist - I still want to add it. So the logic is if it exists in the region replace it, if you can't find it add to to it if (/start/ .. /end/){ s/^foo/bar/; } now what if foo didn't exist - bar still should be set! Any ideas? -- Steven M. Klass Physical Design Manager Na

In line editing? Streaming through perl directly into anotherapp?

ssary Feed line by line my data into the tool Can anyone enlightenmen me on how to best do this?? Thanks so much -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Chandler AZ 85226 Ph:480-753-2503 Fax:480-705-6407 [EMAIL PROT

Re: Searching for words in a specific location

; > push @names, /^\.SUBCKT\s+(\S+)/; > > Sorry, that regex should have an /m modifier on it. > > push @names, /^\.SUBCKT\s+(\S+)/m; > > >} > > } > > close FILE; -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detr

Searching for words in a specific location

teven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Chandler AZ 85226 Ph:480-753-2503 Fax:480-705-6407 [EMAIL PROTECTED] http://www.nsc.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

What's up with STDOUT in a function call?

ict refs" is in use at foo.pl line 5. How can I get around this? -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Chandler AZ 85226 Ph:480-753-2503 Fax:480-705-6407 [EMAIL PROTECTED] http://www.nsc.com -- To unsubscribe

Sorting a hash table - Advanced;)

ain order, but there may be some remaining keys that I want printed that I really don't care about. (a "catch-all" if you will) Thanks -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Chandler AZ 85226 Ph:480-753-2

=head1 ?? -Huh

Hi all, Can you guys clue me in to what this means? How do I use it, and why would I use it? Thanks -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Chandler AZ 85226 Ph:480-753-2503 Fax:480-705-6407 [EMAIL PROTECTED

Creating a valid directory.

-d $dir ) { $dir="" ; } else { return $dir; } } Does anyone have any ideas for this? Thanks so much -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Chandler AZ 85226 Ph:480-753-2503 Fax:480-705-6407 [EMAIL PROTECTED

A pinch more help - before the weekend

exists it passes it, if not it won't be passed. My question is since $test pulls "yes" instead of what ever is held by $conf{Hier}, how can I get the variable $conf{Hier} if it exists. -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit St

Re: More help with my function

t; and if ( $response eq $answers ){ to if ( $response eq $answers[$i] ){ > > It ran without any warnings and after I gave correct answer, it quit. > > Wags ;) > -Original Message- > From: Steven M. Klass [mailto:[EMAIL PROTECTED]] > Sent: Friday, February 1

More help with my function

} if ( ! $match ){ $response = "";} } } I think it must be friday or something, but could someone help me clean this up. I want something simple, and I think I have over-engineered this. Any help is appreciated! Thanks so much. I love this list!:) -- Steven M. Klass Phys

Re: Arrays 1x3 or 3x1 - The real questions

> After that, if you write > my $var2 = shift; > then $var2 will be an array reference to @arry. > > HTH, > Tanton > - Original Message - > From: "Steven M. Klass" <[EMAIL PROTECTED]> > To: "Brett W. McCoy" <[EMAIL PROTECTED]> > Cc:

Re: Arrays 1x3 or 3x1 - The real questions

h is which? I called it specifically earlier, because of this. What am I missing? Thanks so much On Tuesday 12 February 2002 10:06 am, Brett W. McCoy wrote: > On Tue, 12 Feb 2002, Steven M. Klass wrote: > > Let's start off with some simple code.. > > > > my $arg = &SomeFuncti

Arrays 1x3 or 3x1 - The real questions

problem is, but I don't know how to fix it. I only have a 1 x 3 array so only "one" gets printed - instead of the desired "one two three".. How do I fix this? This seems simple enough.. Also if you want to suggest an alternate path, by all means.:) Thanks a lot! --

Replacing text in only certain sections of a file.

; } I know there must be a way to do this. I know I could get messy by using a flag, but I'm sure there is a better way. Would anyone mind helping me out on this? Thanks -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W. Detroit Street Suite 170 Ch

In-line editing..

y option } $APP CELL &; #<<-- This is just a guess?? Basically disconnect and run? Is this the right idea? Is there a better way to do this?? Can someone complete this picture for me, I would really appreciate it -- Steven M. Klass Physical Design Manager National Semicon

Some help needed with regular expressions and general cleanup of code.

uot;); while (){ my $string = $_; my $i; my %h = map { $_ => $i++ } split(/[\b\s]+/,$string); print join(" ", sort { $h{$a} <=> $h{$b} } keys %h); print "\n"; } close LIST; -- Steven M. Klass Physical Design Manager National Semiconductor Corp 7400 W