Search Results

Search found 5595 results on 224 pages for 'mod perl'.

Page 71/224 | < Previous Page | 67 68 69 70 71 72 73 74 75 76 77 78  | Next Page >

• What is the most idiomatic way to emulating Perl's Test::More::done_testing?

  - by DVK

  I have to build unit tests for in environment with a very old version of Test::More (perl5.8 with $Test::More::VERSION being '0.80') which predates the addition of done_testing(). Upgrading to newer Test::More is out of the question for practical reasons. And I am trying to avoid using no_tests - it's generally a bad idea not catching when your…

  Read the article

• Why is my Perl script that calls FTP all of a sudden failing?

  - by Mel

  I have a script that has been running for over a year and now it is failing: It is creating a command file: open ( FTPFILE, ">get_list"); print FTPFILE "dir *.txt"\n"; print FTPFILE "quit\n"; close FTPFILE; Then I run the system command: $command = "ftp ".$Server." < get_list | grep \"\^-\" >new_list"; $code = system($command); …

  Read the article

• How can I get file size in perl before uploading it?

  - by zeina

  I want to get file size I'm doing this: my $filename=$query->param("upload_file"); my $filesize = (-s $filename) ; print "Size: $filesize "; Yet it is not working.Note that I did not upload the file. I want to check its size before uploading it. so to limit it to max of 1 MB.

  Read the article

• How can I ignore the block content reading in Perl.

  - by Nano HE

  Hello. I plan to ignore the block content which include the start line of "MaterializeU4()" with the subroutin() read_block below. But failed. # Read a constant definition block from a file handle. # void return when there is no data left in the file. # Otherwise return an array ref containing lines to in the block. sub read_block { …

  Read the article

• How can I build and parse HTTP URL's / URI's / paths in Perl?

  - by Robert S. Barnes

  I have a wget-like script which downloads a page and then retrieves all the files linked in IMG tags on that page. Given the URL of the original page and the the link extracted from the IMG tag in that page I need to build the URL for the image file I want to retrieve. Currently I use a function I wrote: sub build_url { my ( $base,…

  Read the article

• How do I set font colour with the PDF::API2 Perl module?

  - by Ralph

  I need to add colour to some text in a PDF document using PDF::API2 - how do I do that?

  Read the article

• How can I test TCP socket status in Perl?

  - by Gearoid Murphy

  I've got a TCP socket which reads data. When an error occurs when reading the data, I return an undef (NULL) value. Errors can be caused by badly formatted messages or broken sockets. Can someone tell me if there is a specific function which returns the status of a socket?

  Read the article

• Is there a Perl implementation of Factor Graphs sum-product scheduling?

  - by Timmy

  Are there good example codes of implementations of factor graph sum-product scheduling? I am new to the concept, and would like to see how it gets implemented.

  Read the article

• Why learn Perl, Python, Ruby if the company is using C++, C# or Java as the application language?

  - by szabgab

  I wonder why would a C++, C#, Java developer want to learn a dynamic language? Assuming the company won't switch its main development language from C++/C#/Java to a dynamic one what use is there for a dynamic language? What helper tasks can be done by the dynamic languages faster or better after only a few days of learning than with the…

  Read the article

• How can I insert content between the 2nd and 3rd paragraphs in HTML, using Perl?

  - by Bob

  I'm trying to match the point between 2nd and 3rd paragraphs to insert some content. Paragraphs are delimited either by <p> or 2 newlines, mixed. Here's an example: text text text text text text text text <p> text text text text text text text text </p> <--------------------------- want to insert…

  Read the article

• How can I access a specific range of bytes in a file using Perl?

  - by nohat

  What is the most convenient way to extract a specified byte range of a file on disk into a variable?

  Read the article

• How can I get 100% test coverage in a Perl module that uses DBI?

  - by BrianH

  I am a bit new to the Devel::Cover module, but have found it very useful in making sure I am not missing tests. A problem I am running into is understanding the report from Devel::Cover. I've looked at the documentation, but can't figure out what I need to test to get 100% coverage. Here is the output from the cover report: line err…

  Read the article

• Converting Mod-rewrite rules which use %(QUERY_STRING) to NGINX rewrite format?

  - by HipHop-opatamus

  I've been stuck the last few days trying to convert the following Apache/Mod_Rewrite rewrite rule to NGINX format. Anyone know where I am going wrong? MOD_REWRITE: RewriteCond %{QUERY_STRING} topic=([0-9]+) RewriteRule /forum/index\.php /forum/vbseo301.php?action=thread&oldid=%1 [L] NGINX: location /forum/index.php { …

  Read the article

• Can I find a filename from a filehandle in Perl?

  - by sh-beta

  open(my $fh, '>', $path) || die $!; my_sub($fh); Can my_sub() somehow extrapolate $path from $fh?

  Read the article

• How do I encrypt the password for new users, using Perl's Net::LDAP?

  - by user352860

  How do I encrypt the password for adding LDAP users using Net::LDAP's add()? How do I make the attribute {password} as crypt?

  Read the article

• How to print a variable in reversed byte order in Perl?

  - by jth

  Hi, I'am trying to convert the variable $num into its reverse byte order and print it out. This is what I have done so far: my $num=0x5514ddb7; my $s=pack('I!',$num); print "$s\n"; He prints it out as some non-printable characters and in a hex editor it looks right, but how can I get it readable on the console? Already tried print…

  Read the article

• Why are values being truncated while reading an Excel 2007 (.xlsx) file in Perl?

  - by K.Rao

  I am reading an .xls file using Spreadsheet::ParseExcel and was able to get data as is. But,when reading an .xlsx file using Spreadsheet::XLSX, the read values are truncated. E.g., 2.4578 in .xls and .xlsx file is read as 2.4578 and 2.45, respectively. Please suggest why .xlsx file data is corrupted.

  Read the article

• Running commands though PHP/Perl scripts as a priviledged user on Linux.

  - by jtd

  Background: I am writing a script for a company that will allow users to create FTP accounts through a web interface. In the background, the script must run a bunch of commands: Add the user to the system (useradd) Open and edit various files mail the user via sendmail and a few other things... I'm basically looking for the most…

  Read the article

• Is there a Perl module to test internet connection speed?

  - by sid_com

  Does anybody know a module to test the speed of internet-connection?

  Read the article

• How can I read and parse chunks of data into a Perl hash of arrays?

  - by neversaint

  I have data that looks like this: #info #info2 1:SRX004541 Submitter: UT-MGS, UT-MGS Study: Glossina morsitans transcript sequencing project(SRP000741) Sample: Glossina morsitans(SRS002835) Instrument: Illumina Genome Analyzer Total: 1 run, 8.3M spots, 299.9M bases Run #1: SRR016086, 8330172 spots, 299886192 bases 2:SRX004540…

  Read the article

• How can I pass an array resulting from a Perl method by reference?

  - by arareko

  Some XML::LibXML methods return arrays instead of references to arrays. Instead of doing this: $self->process_items($xml->findnodes('items/item')); I want to do something like: $self->process_items(\$xml->findnodes('items/item')); So that in process_items() I can dereference the original array instead of…

  Read the article

• Should Perl's opendir always return . and .. first?

  - by ojblass

  opendir MYDIR, "$dir"; my @FILES = readdir MYDIR; closedir MYDIR; It appears that 99.9 % of the time the first two entries in the array are always “.” and “..”. Later logic in the script has issues if it is not true. I ran into a case where the directory entries appeared later. Is this indicative of the file…

  Read the article

• How to optimize perl code for directory exists or not ?

  - by SCNCN2010

  sub DirectoryExists { my $param = shift; # Remove first element of the array shift @{$param}; # Loop through each directory to see if it exists foreach my $directory (@{$param}) { unless (-e $directory && -d $directory) { return 0; …

  Read the article

• Is there a better way to test or debug Mod rewrite rules other than using the browser?

  - by ghostz00

  It's hard for me to grasp what a rewrite is actually doing. I would like to setup some rules and then be able to throw tests at it and step through it like a debugger.

  Read the article

• Perl/SQLite - How do I select / update a row with the prepare method?

  - by somebody

  I have the following code my $db = DBI->connect( "dbi:SQLite:data.db", "", "", { RaiseError => 1, AutoCommit => 1, PrintError => 0 } ); my $row = $db->selectall_arrayref( "SELECT * FROM something WHERE name=\'$hash->{name}\'"); print Dumper $row; How do I do the same with my $sql =…

  Read the article

< Previous Page | 67 68 69 70 71 72 73 74 75 76 77 78  | Next Page >