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!

  • Congratulations dencom 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: gammaman1
  • Content: Threads
  • Order by date
  1. gammaman1

    capturing output for 60 seconds

    hi, Does anyone know of a module I could use to constantly capture output within a timeframe? Basically, I want to capture everything that a console is spitting out for 60 seconds. Then I'm planning to search through the output to look for a specific phrase. Any tips would be much appriciated...
  2. gammaman1

    regular expression

    can someone break this down for me? I'm still trying to understand regular expressions: $test =~ /^(.*): +(.*)$/) thanks, gammaman
  3. gammaman1

    regular expressions again

    you guys have all been a big help. I have one more question on regular expressions though. I want to make an if statement that will print out the line if a word is in the first pair of parenthesis. for example, these would print out: 1. (blah blah WORD) blah blah blah blah 2. (WORD) blah blah...
  4. gammaman1

    perl's regular expressions

    using perl, how would i get it to erase everything up to and including the first bracket [ ? I have this, but it only erases up to the [. I need the bracket removed as well. for($i=0;$i<@mylist;$i++) { @mylist[$i] =~ s/[^]]*//; } any ideas? thanks, gammaman
  5. gammaman1

    does perl have a built in sed?

    hi, I have a windows version of perl installed, and I realized that I need a sed function that's like the unix version. Does perl have a sed? if so, would you call it the same as you would do in unix? ie. " sed -e '/^ *$/d' input" ? thanks, gammaman
  6. gammaman1

    concatenation in perl

    hi, i'm having trouble with concatenation in perl. What I need to do is put the input of a file into an array. Then I want to join certain indices in the array. For example: open FILENAME, "testtest"; @mylist = <FILENAME>; close FILENAME; $temp = @mylist[0] . @mylist[1]; print "$temp"; The...
  7. gammaman1

    sorting in perl

    hi, I have a file that lists files and filepath such as this: C:\foldera\file1 C:\folderb\file2 ... C:\folderc\file10 C:\folderd\file11 I'm trying to figure out a way to sort these so that they will be sorted in ascending order. I tried using perl's sort: @sorted_array = sort { $a <=> $b }...
  8. gammaman1

    execute perl file within a perl file

    hi, this is probably really simple, but I haven't figured this out. All I want to do is execute file1.pl which will then execute file2.pl. In unix, I would probably just call "file2.pl" but I'm using perl in windows XP. what command do i need? thanks, gammaman1
  9. gammaman1

    select and filehandlers in perl

    Hi, I'm trying to verify this line of code: select( ( select( STDOUT ), $| = 1 )[ 0 ] ); this line is in a file that takes in 3 arguments. From what I read from my oreilly book, does this mean that select will return the output filehandle if there is at least 1 arguement? thanks, gammaman1
  10. gammaman1

    how much info can a variable store?

    I'm trying to store a large amount of data into a variable, and then ouputting the results to a text file. open results, ">results"; $test = `execute program that will output`; print results "$test"; close results; so now I will have a huge text file named results. But when I run this, the...
  11. gammaman1

    outputting results to a temporary file

    Hi, I just installed windows XP on my machine, and I was trying to figure out how to output the results of an execution to a file. For example: check_execute("grep test testfile"); sub check_execute { if (system("$_[0]") != 0) { print "failed execution"; print ($?>>8)...

Part and Inventory Search

Back
Top