Perl Feed - Programmer's Heaven

Re: HTML to PDF automatic conversion

Sat, 08 Aug 2009 23:39:44 -0700

fchivu posted a reply on the Perl forum.

You can try the HTML to PDF converter from http://www.winnovative-software.com . It's a .NET library but you can easily create a web service to call from your PHP application.

Using WWW::Mechanize

Thu, 28 May 2009 19:19:27 -0700

higherpass submitted a new article.

Learn to use the WWW::Mechanize Perl module to navigate websites and submit webforms with just a few lines of code. WWW::Mechanize allows you to quickly and easily retrieve webpages, parse documents, and more.

Re: regular expressions

Fri, 10 Apr 2009 10:10:51 -0700

tonyn posted a reply on the Perl forum.

Hi,

thanks for your help.

Tony

regular expressions

Wed, 08 Apr 2009 14:00:48 -0700

tonyn posted a new message on the Perl forum.

Hi,

I have a file name which have these lines in the file. I want to compare if the schematic port and layout port are different then I report this file has port name different. Below is my code but it has problem with $1 and $2. How can I get $1 and $2?

thanks,
Tony

while (<INF>) {
$port_session = 1 if ( /port\s*Port class\s*Schematic port\s*Layout port/ ) ;
if ( /\*\s+\d+\s+(\S+) \ (\S+)$/ && $port_session ) {
$mismatch = 1 if ( $1 !~ $2 );
}
}

close(INF);

port Port class Schematic port Layout port
---------- ---------- -------------------- --------------------
L 1 D D
L 4 Q Q
L 6 RST x_6
L 5 SET SET
L 2 XCLK x_3
L 3 XQ XQ

ChartDirector for Perl 5.0

Wed, 08 Apr 2009 11:22:15 -0700

Peter Kwan submitted a new file.

ChartDirector is a fast and powerful charting component for creating professional and clickable charts. It's unique layering architecture enables you to synthesize the charts you want using standard chart layers. ChartDirector's comprehensive chart styles include pie, donut, bar, line, spline, step line, trend line, curve-fitting, inter-line filling, area, band, scatter, bubble, floating box, box-whisker, waterfall, contour, heat map, surface, vector, finance, gantt, radar, polar, rose, pyramid, cone, funnel, angular and linear meters and guages. ChartDirector charts are interactive with full suite of mouse events, supporting tool tips, clickable chart objects, and "drag to zoom" and "drag to scroll" features. AJAX enabled features allow charts to update without refreshing web pages. Easy to use and with comprehensive documentation. Come with numerous examples. Free trial available.

APPLICATION PROCESES

Tue, 07 Apr 2009 12:32:41 -0700

SHADOWING posted a new message on the Perl forum.

hello everyone i would if i may ask a question before i start programing i was told and advised to learn perl

and before i do my job is networking by the way,never programed in my hole life and i would like to ask if i may and hope that someone qwould take the time to awnser my question what is the processing of perl generaly used for example

application programs

web script ect what is the general use for perl and what is the main arcehtecture behind its usfullness within the programing world and what is it most used for i would like to thankyou for taking the time in reading may mail yours sincerly shadowdevelopment

Re: HTML to PDF automatic conversion

Thu, 02 Apr 2009 21:52:51 -0700

fchivu posted a reply on the Perl forum.

You can try the html to pdf converter from http://www.winnovative-software.com. You can build a simple web service with the development library and call that html to pdf web service from any application.

Question for Jonathan, by the way... long time.

Thu, 05 Mar 2009 18:44:00 -0700

Old Joe (Home) posted a new message on the Perl forum.

Hi Jonathan,

I'm trying to figure out where the date and time stamps are listed
in a Win32 Application event log. I've figured out how to parse all the rest of the information from Application event logs, but still haven't found the date and time stamps. Do you know if they are kept in an associated file? Let em know if you can help.

Regards,
Old Joe

Re: Call perl program from C

Thu, 12 Feb 2009 04:00:53 -0700

gustavo-serra posted a reply on the C/C++ on Linux/Unix forum.

Well, this post is rather old. I am returning to Programmers Heaven, so I just saw it.

Ok, my sugesstion is that you could create two pipe files. You would perform this outside from your program. You can see how here.

Then, you will start the execution of your Perl script and instruct it to read/write from/to the pipes that you created. In your C program, you will open both pipes too. Then, all the communication between the perl script and C executable will happen through the pipes. You need to start the perl script only once (I don't know how the script or, to tell the truth, how Perl works).

Hope it helps!

Eclipse DLTK IDE for Perl, Python, and PHP scripting

Thu, 05 Feb 2009 10:15:20 -0700

Solrac submitted a new article called 'Eclipse DLTK IDE for Perl, Python, and PHP scripting'.

Eclipse presents a wealth of capabilities for building tools for compiled languages like C and the Java programming language, but provides little support for scripting languages like Perl, Python, and PHP. For these and similar languages, the Eclipse Dynamic Languages Toolkit (DLTK) comes to the rescue. This tutorial Walks you through the process of building a DLTK-based IDE and provides sample code for each step.

simple game using perl

Sun, 01 Feb 2009 19:28:20 -0700

jurrielyn posted a new message on the Game programming forum.

kindly help me in developing a game using perl....thanks

games using perl

Sun, 01 Feb 2009 19:08:44 -0700

jurrielyn posted a new message on the Perl forum.

I'm having a hard time to develop a simple game using pearl. Kindly give me a hand....Thanks

All the Lightweight Web servers of the world

Thu, 22 Jan 2009 19:10:09 -0700

Solrac submitted a new article called 'All the Lightweight Web servers of the world'.

There's far more to the world of Web servers than just Apache and IIS. While lightweight Web servers have much in common, there's also variation within the category. Most are written in C, but several other implementation languages have proven successful among the servers with which I've experimented, including Erlang, Java, Lisp, Lua, Perl, Python, and Tcl. If there's a language you favor, you can probably find a lightweight Web server here coded for your convenience. Survey the possibilities and see how they apply to you.

Stepping through a file

Thu, 18 Dec 2008 14:36:47 -0700

saridski posted a new message on the Perl forum.

Hi there,

I have a file containg this:

aabbccddeeffgg

And i want the following output:

aa
ab
bb
bc
cc
cd
dd
de
..
..

I have tried with the following:

..
while (($n = read(F_IN, $data, 2, $offset)) != 0) {
print "$data\n";
$offset += 1;
}
..

But the output looks all wrong:

aa
abb
abcc
abcdd
abcdee
abcdeff
abcdefgh
abcdefghi
abcdefghij
abcdefghijk
abcdefghijk

Can anyone come with some insight? I'd really appreciate it.

Thanks in advance!

saridski.

Simple Mozilla-Firefox Bookmarks Checker v0.2

Mon, 08 Dec 2008 08:17:38 -0700

partenavia submitted a new file called 'Simple Mozilla-Firefox Bookmarks Checker v0.2'.

This small and simple Perl program permits you to get some informations about mozilla-firefox bookmarks. It scans a given bookmark file and tries to output all broken and duplicated links in the file itself. It saves the result to an html file whose style is pretty changeable.

Using the seek function to go to a certian byte range

Tue, 02 Dec 2008 12:48:34 -0700

Reddyfire posted the message 'Using the seek function to go to a certian byte range' on the Perl forum.

So I'm trying to use the seek function to seek a couple of lines of the file without going to the end of the file. Just trying to stay within a certain byte range. Here is my code.

#!/usr/local/bin/perl
print "content-type: text/html\n\n";
open (FILE, "< file.txt") or die("File not found");
seek FILE, 21,0;
while(<FILE>)
{
print;
}
close(FILE);
exit;

What would I need to do to only stay within a certain byte range and display the text only in that byte range without going to the end of the file. I have looked all over but can't seem to figure out how to do this without going to the end of the file.

Expand your user-authentication options with mouse dynamics

Mon, 01 Dec 2008 10:25:59 -0700

jmalasko submitted a new article called 'Expand your user-authentication options with mouse dynamics'.

In this article, learn how to apply the open source tools cnee and Perl in mouse-click dynamics to measure the more subtle characteristics of human-computer interaction. Also, learn how to use the number and hold time of mouse-click events to help authenticate users.

Shut down idle computers on your network automatically

Thu, 23 Oct 2008 09:02:08 -0700

jmalasko submitted a new article called 'Shut down idle computers on your network automatically'.

Recent pushes for "green" technology focus mostly on talk, with little action for the typical home- or small-office environment. Many users leave their systems online continuously, resulting in a significant source of power consumption. Learn how to use Argus and client/server Perl code to monitor your network connections and shut down machines no longer in use.

Write a Firefox extension to rotate images in mapping apps

Thu, 16 Oct 2008 09:22:50 -0700

jmalasko submitted a new article called 'Write a Firefox extension to rotate images in mapping apps'.

Most online mapping applications assume that the desired view is always north at the top of the image. This article presents tools and code that show how to replace the map image with an inverted copy, where south is at the top. Using a Firefox extension and the Imager Perl module, each tile that comprises the full image is extracted, rotated, and placed back in the image at the appropriate spot.

Checking and Downloading mail messages

Wed, 15 Oct 2008 21:04:25 -0700

ve6sar posted the message 'Checking and Downloading mail messages' on the Perl forum.

Good day,

I'm looking at writing a script that checks my gmail account for messages with a certain subject and then parsing it.

Where I'm having problems is I can't seem to get either GMail::IMAPD
or Mail::Webmail::Gmail to connect and check the message list.

Has anyone had success with either of these modules?

Is there a better one oput there?

Thanks
Sean

Enhance image overlay maps in Google Earth with altitude attributes

Thu, 25 Sep 2008 09:52:11 -0700

jmalasko submitted a new article called 'Enhance image overlay maps in Google Earth with altitude attributes'.

Learn how to use Perl and the Imager module to enhance mapping applications by extracting and applying height information based on color. The end result is a third dimension of data, showing more information in the same space and opening up new methods of visualization for your map users.

Create time-availability maps with Perl and Google Earth

Wed, 27 Aug 2008 10:00:01 -0700

jmalasko submitted a new article called 'Create time-availability maps with Perl and Google Earth'.

Nationwide and international teams and flexible work hours contribute to change in when and where teams work together. Time-availability maps provide a listing of who is most likely to be available for a certain hour in a certain location. Find out how to use Google Earth and a log of your communications to map and identify the time and place when availabilities match.

Re: Open Source Perl editor

Thu, 21 Aug 2008 02:37:16 -0700

Jonathan posted the message 'Re: Open Source Perl editor' on the Perl forum.

: Also, does anyone know a good site to download a Perl editor, like
: KATE which is actually my fav, for free?? Unfortunately I'm running
: windows right now, coding in editpad using the Perl interpreter
: through command prompt, because I am still working on Linux(suse)
: for this comp, so I don't know if I could run KATE or not, but I do
: know I need a good coding editor, preferably from opensource for
: little or no cost. Any ideas?
:
Check out Padre, which is currently a work in progress but actually written in Perl itself (I saw it being talked about at the European Perl Conference just last week, not had chance to try it myself yet), and also EPIC, which is an Eclipse IDE plug-in for Perl support.

http://padre.perlide.org/
http://www.epic-ide.org/

Hope this helps!

Jonathan
###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

Re: HELP: parsing unicode web sites

Mon, 04 Aug 2008 03:44:22 -0700

andrewwan1980 posted the message 'Re: HELP: parsing unicode web sites' on the Perl forum.

Thanks to those who helped. Here's my working script:

#!/usr/bin/perl
# tom365crawl2.pl
# http://www.cs.utk.edu/cs594ipm/perl/crawltut.html
# http://perldoc.perl.org/Encode.html
# http://juerd.nl/site.plp/perluniadvice
# http://www.perlmonks.org/?node_id=620068

use warnings;
use strict;

use File::stat;
use Tie::File;

use LWP::Simple;
use LWP::UserAgent;
use HTTP::Request;
use HTTP::Response;
use HTML::LinkExtor; # Allows you to extract the links off of an HTML page.
#use File::Slurp;

use Encode;

my $site1 = "http://www.tom365.com/"; # Full url like http://www.tom365.com/movie_2004/html/????.html
my $delim1a = "\<div class=\"movie\"\>\<img src=\"";
my $delim1b = "\" class=\"mp\" \/\>";
my $folder1 = "movie_2004/html/";
my $url1;
my $start1 = 1000;
my $end1 = 1000;
my $contents1;
my $image1;

my $browser1 = LWP::UserAgent->new();
$browser1->timeout(10);
my $request1;
my $response1;

my $count;
for ($count=$start1; $count<=$end1; $count++) {
  $url1 = $site1 . $folder1 . $count . ".html";
  printf "Downloading %s\n", $url1;

  # Method 1
  #$contents1 = get($url1);

  # Method 2
  $request1 = HTTP::Request->new(GET => $url1);
  $response1 = $browser1->request($request1);
  if ($response1->is_error()) {
    printf "%s\n", $response1->status_line;
  }
  $contents1 = $response1->decoded_content();

  #open(NEWFILE1, "> Debug.txt");
  #(print NEWFILE1 $contents1)    or die "Can't write to Debug.txt: $!";
  #close(NEWFILE1);

  #print $contents1;

  if ($contents1 =~ /\<div class=\"movie\"\>\<img src=\"(.*)\" class=\"mp\" \/\>/m) {
    $image1 = "$1";
    printf "Downloading %s\n", $image1;
    `wget -q -O $count.jpg $image1`;

    #if ($image1 =~ /\/([^\/]*)$/m) {
    #  printf "Renaming %s to $count.jpg\n", $1;
    #} else {
    #  printf "Could not rename %s to $count.jpg\n", $image1;
    #}
  } else {
    #open(NEWFILE1, "> $count.txt");
    #(print NEWFILE1 "Download failed.\n")    or die "Can't write to $image1: $!";
    #close(NEWFILE1);
  }
}

Re: open a program in perl, write to it and then obtain its output

Thu, 31 Jul 2008 08:30:37 -0700

Jonathan posted the message 'Re: open a program in perl, write to it and then obtain its output' on the Perl forum.

: I'm trying to open a program in Perl (say the R language). I'd like
: to be able to send code to this other program once it launches, and
: then gather the output back in Perl. Is there some way to do this?
:
Yes; check out this from the Perl docs:
http://perldoc.perl.org/perlipc.html#Bidirectional-Communication-with-Another-Process

Jonathan
###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

Re: HELP: parsing unicode web sites

Thu, 31 Jul 2008 08:28:17 -0700

Jonathan posted the message 'Re: HELP: parsing unicode web sites' on the Perl forum.

Hi,

A unicode advice page:
http://juerd.nl/site.plp/perluniadvice

Notes that recent versions of LWP are unicode aware - are you running a fairly recent version of the module and/or recent version of Perl? It also suggests looking at HTTP::Response::Charset.

Thanks,

Jonathan
###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

HELP: parsing unicode web sites

Thu, 31 Jul 2008 06:56:56 -0700

andrewwan1980 posted the message 'HELP: parsing unicode web sites' on the Perl forum.

I need help in parsing unicode webpages & downloading jpeg image files via Perl scripts.

I read http://www.cs.utk.edu/cs594ipm/perl/crawltut.html about using LWP or HTTP or get($url) functions & libraries. But the content returned is always garbled. I have used get($url) on a non-unicode webpage and the content is returned in perfect ascii.

But now I want to parse http://www.tom365.com/movie_2004/html/5507.html and the page I get back is garbled encoded. I have read about Encode but don't know how to use it.

I need a Perl script to parse that above page and extract the URL for the image in this pattern:

<div class="movie"><img src="http://pic.tom365.com/imgs/tongjifan.jpg" class="mp" />

If anyone knows how to do this parsing unicode webpages then I'd be very grateful.

Thank you

Extracting specific variables from a fixed-width data file

Thu, 03 Jul 2008 11:19:23 -0700

lunabelle22a posted the message 'Extracting specific variables from a fixed-width data file' on the Perl forum.

I have a data file with a 6 fixed-width columns. These columns alternate between variables (width=25) and their corresponding values (width=15). There are a total of 125 variables, however I only need 6 of them and their values for future plotting purposes.

How do I extract ONLY the variables and values i need from this rather large table and print them in a plottable format? Is there a script I can use that will find/locate specific keys in a data file?

Thank you!

open a program in perl, write to it and then obtain its output

Wed, 02 Jul 2008 20:43:05 -0700

aardvarc posted the message 'open a program in perl, write to it and then obtain its output' on the Perl forum.

Hi,

I'm trying to open a program in Perl (say the R language). I'd like to be able to send code to this other program once it launches, and then gather the output back in Perl. Is there some way to do this?

Thanks very much.

L.

Re: Help in connecting to JDBC using perl

Wed, 16 Apr 2008 04:40:51 -0700

Jonathan posted the message 'Re: Help in connecting to JDBC using perl' on the Perl forum.

Hi,

I think the connection string is wrong...looking at the docs:
http://search.cpan.org/~vizdom/DBD-JDBC-0.70/JDBC.pod

It should be more like "dbi:JDBC:hostname...". See that documentation for full details of the module - I'm not in any way familiar with it so I can't tell you any more than it can.

Jonathan
###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");