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 strongm 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: *

  1. h011ywood

    RTF::Writer and printing

    Alright, so here's the problem. I have a script that generates a report in HTML, whcih as we all know printing HTML isn't great, so I've added a button that when clicked will generate an RTF using RTF::Writer. Because of the potential of High Volume of users accessing this report I'm...
  2. h011ywood

    RegExp to remove entire HTML tag

    $html = qq{ blah blah blah blah < tag sagsdgasdg WORD asdf adgasdgadg /tag > blah this that this that this that< tag checkechkechke name=blah value=1 type=hidden sagsdgasdg WORD asdf adgasdgadg /tag > after after after }; $html =~ s/\<\s*tag.*(WORD).*\/tag\s*\>//g; print $html...
  3. h011ywood

    PERL DBI: ORA-01000 Maximum open cursurs exceeded

    I'm receiving this error ORA-01000: maximum open cursors exceeded I am wondering if anyone has ideas as how to solve this problem. I've read up on turning the prepare_cache() off, but hoping that there are other ways around this. Thanks in advance.
  4. h011ywood

    suidperl -- Perl 5.8.2

    You can get the rpm here: http://www.megaloman.com/~hany/RPM/perl-suidperl.html
  5. h011ywood

    create a variable named after the output of another

    Quite Simple... @$var; The $var is de-eferenced and 'perl' is put as the name to the array.
  6. h011ywood

    Running Perl(I'm a beginner) on my shared website

    Good post Siberian. Use the CGI module. It'll help when you continue your web development.
  7. h011ywood

    Running Perl(I'm a beginner) on my shared website

    Save your file in the cgi-bin directory as hello.cgi Use this, and then try it. #!/usr/bin/perl -w print &quot;Content-type: text/html\n\n&quot;; print &quot;<H1>Hello World</H1>\n&quot;;
  8. h011ywood

    deleting oldest file

    Should go here... sub wanted { if( -f and $File::Find::name =~ /^OV_BACKUP_\d+/){ $info{-M $File::Find::name}= $File::Find::name; } }
  9. h011ywood

    Looking to delete files older thatn &quot;X&quot;

    -M is the modified time. I believe this works. Also, you could use perl's stat() function use File::stat; $stat = stat($file); $created = $stat->ctime;
  10. h011ywood

    Appending multiple files

    You will probably need to fork off processes to do the changes. Then implement a lock file schema. If the lock file is present, wait, and then poll for it again. while( 1 ){ unless( -e file_lock ) { system(&quot;touch file_lock&quot;); open(FILE...
  11. h011ywood

    Forking Memory Errors

    I'm not sure what the problem is. I ran a test code of what you posted. I created a hash, and at the end printed out the pid numbers. From my test, 4 processes should have been spawned, and it printed out 4 pid numbers. Thus, the code works. the exit command in the child process should only...
  12. h011ywood

    Oracle Database Information

    Hahaha. Good point. I definately wouldn't. It was for a job interview...just didn't wanted some background of Oracle before I had the interview. Might have worked, I got the job!
  13. h011ywood

    Oracle Database Information

    I'm looking to find information on the Oracle database. What it is and how to use it. I'll be writing perl scripts to access the database, but don't know anything about Oracle. Any links to documentation would be very helpful. Thanks.
  14. h011ywood

    Noobie hash-value question

    Assuming the hash is [ user1 => 2, user2 => 3, user3 => 6, user4 => 4, . . . ] This will loop through the hash, greatest num of processes running to the least, exit the loop, once all users with >=4 processes have been processed. foreach my $key (reverse sort {$hash{$a} <=>...
  15. h011ywood

    Oracle Database

    I'm going to be writing perl scripts to access an Oracle Database. I know perl well, but haven't a clue how an Oracle Database works. I've seen previous threads the last few weeks regarding DBD::Oracle, and DBI modules, but was wondering where some good information lies the Oracle Databse...
  16. h011ywood

    how to create directory?

    It's probably safer to do this: use File::Path; mkpath($path); In the case that you are trying to create a directory, where a previous directory doesn't exist. i.e. You want to create: /documents/tests/drivers/linux/kernel and directory /documents/tests/drivers doesn't exist....it wont...
  17. h011ywood

    detecting status of job daemon

    Paul, I tried that, still prints out the same error. Hwood
  18. h011ywood

    detecting status of job daemon

    Not sure what the problem is. I threw the print <<EOF into a piece of code, at the top. I ran it once, and it printed. I ran it again, and again, and now nothing prints, with the same error. You can always surround the code with &quot;&quot;'s. Its a solution.
  19. h011ywood

    detecting status of job daemon

    #!/bin/perl @results = `ps -ef | grep jobd`; @runningJobs = (); @testJobs =...
  20. h011ywood

    detecting status of job daemon

    semi colon after your @testJobs array.

Part and Inventory Search

Back
Top