Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: polka4ever
  • Content: Threads
  • Order by date
  1. polka4ever

    how to say, zip code Starts With

    hello, I am more of an SQL person - so what I am trying to say, I am not sure how to say in Perl. I am sure it is some sort of regular expression. Maybe YOU can help me! I would like to say, if ($ZipPlus4 STARTS WITH 29626) then increment n. any hints? thank you!
  2. polka4ever

    understanding Hashes

    Hello! I am new to Perl and have been using it intermittently in a QA role. Mainly for parsing & testing tab delimited files. I am reading through the Learning Perl book & working through Chapter 5 right now which is a chapter on hashes. I am not sure I'm understanding a Hash on the large...
  3. polka4ever

    break out STDIN into single letters

    Hello, I am new to perl and working my way through the Learning Perl book. I'm only on page 37, so bear with me!!! I want to take STDIN and break it into letters. It's a decoder program. Like, for example, if someone types in: LC8Q4 CBDSN XQRHD NKJXB HR into STDIN ... it will come out as BECAR...
  4. polka4ever

    pull only rows where field 2 is 'WI' in tab-delimited file

    hello! I have a story problem for you. I have a tab-delimited file. The 2nd field is the "state" field, and I want to pull out of this file, and write to a NEW file, only the rows that have Wisconsin as their state. 'WI' I believe I need to use "split" but not sure how. This is how far I've...
  5. polka4ever

    Putting "awk" inside of perl, system `cmd`

    hello, does perl allow/understand when i use AWK inside of a system command? I can't understand why this isn't working: $pid=`ps -ef | grep java | egrep -v grep | awk '{print $2}'`; print "$pid"; when i type: ps -ef | grep java | egrep -v grep | awk '{print $2}' at the command prompt itself...
  6. polka4ever

    load a System command into a Variable

    hello, i would like to load a system command into a variable. The system command is: system "ps -ef | grep java3 | egrep -v grep | awk '{print $2}'"; I'm guessing the way I would do this is: my $proc = system "ps -ef | grep java3 | egrep -v grep | awk '{print $2}'"; But i have a question...
  7. polka4ever

    incorrect Results - Looping through Files & substr ()

    Hello, I am getting incorrect results and I am a newbie - so if you have any ideas, I would greatly appreciate the help! here is what I have: #!/usr/local/bin/perl for (<suspec*.data>) { open(INFO, $_) or die "Can't open input file: $!"; while (<INFO>){ chomp; my $small_string = substr...
  8. polka4ever

    ps -ef | grep &quot;java command&quot; - process id

    Hello! I am using this command in PERL: system "ps -ef | grep 'java command'"; But how do i get the process ID off of this so I can kill the process? Also, I want to be very sure I am killing the correct process as well. ~p4e
  9. polka4ever

    REGEX: $n++ if ($small_string=~ /.*grand.*/);

    I am pretty new to regular expressions. I have a book and I am reading fervently, but unable to get this to work. I'd like to increment n anytime my variable has the value 'grand' in it. First question: Is this case sensitive? If so - how do I make it NOT case sensitive? I am trying to match...
  10. polka4ever

    open(INFO, $file) - open MORE THAN 1 File ?

    Hello, I would like to use the open() function to open several files. I tried doing it this way: $file = 'test*.file'; # Name the file open(INFO, $file) or die "Can't open input file: $!"; # Open the file But this isn't working. The files are named: test.file, test1.file...
  11. polka4ever

    if (! $small_string=~ /\s*/){ - NOT WORKING

    Hello, Well I have tried a million variations on this! HA! Oh I can't wait until I get through this learning curve for perl. It seems even the smallest stuff is tripping me up at this point. Anyhow, wanted to run it past you in the forums to see if you can straighten things out in my head...
  12. polka4ever

    my $small_string = substr ($_, 168, 6); SUBSTR

    Hello, First of all, I open a file in Perl and then i use substr to pull out just a piece of each row in my flat file (which is fixed length). Now, I would like to get a count of that substr - that actually has values, that isn't empty or blank. So I'm not sure which function to use. Here is...
  13. polka4ever

    $line = &quot;wc -l test.txt&quot;; how to execute

    Hello, I would like to run a count of rows on a flat file. From a unix prompt, i would just type wc -l, right? but I want to do this within a perl script. So - how do i get this to execute? I am a brand new perl user. I tried this: $line = "wc -l test.txt"; print "$line\n"; But that literally...
  14. polka4ever

    Use python to search through Flat Files

    Hello! I am a brand new, novice python user. I'd like to use python to search through some very large flat files that i have. These files will eventually be loaded into a database. The files are fixed width - and i'd like to search each row inbetween a particular range (like between characters...

Part and Inventory Search

Back
Top