Search Results

Search found 3397 results on 136 pages for 'libwww perl'.

Page 11/136 | < Previous Page | 7 8 9 10 11 12 13 14 15 16 17 18  | Next Page >

• Changing one byte of a file in Perl

  - by jnylen

  Very similar to http://stackoverflow.com/questions/845127/changing-one-byte-in-a-file-in-c, but in Perl instead of C: How can I open a binary file in Perl, change ONLY the first byte, and write it back out?

  Read the article

• Perl Tk: Clearing Frame Elements Value

  - by pavun_cool

  Hi All, In Perl tk I have designed one interface in that I have one frame . That frame has some Entry And Text box . When I am clicking the button those Entry and Text value has to clear in the Frame .I know that we can access each ( Entry , Text ) object then we can clear using delete function. I need some as like html reset functionality . How can do this things in Perl Tk...... Thanks ...

  Read the article

• Perl Script in PHP

  - by Sev

  I have a perl script, which takes a query string parameter, connects to a database and displays data. I'd like to include that script in a PHP file like so: include('perlscript.pl?item=302'); Such that the perl script's response is displayed on the PHP/HTML page. How can I do this?

  Read the article

• perl inside a shell script

  - by benjamin button

  I want to do this in a shell script: #!/bin/ksh #i am setting a variable "var" inside perl script perl test.pl #Now i want to use that value in the shell script echo $var How do i do it?

  Read the article

• perl regex escape characters

  - by freshWoWer

  I have heard perl is a good language at doing regex but i am a bit confused at the characters that requires escaping I tested the code on http://regexlib.com/RETester.aspx and got the result I want //home/dev/abc/code/hello/world.cpp#1 //home/dev/((.*?)/[^/]+).*# Match $1 $2 //home/dev/abc/code/hello/world.cpp# abc/code abc However, I am not quite sure how do i translate this to perl code I tried, \/\/home\/dev\/\(\(\.\*\?\)\/\[\^\/\]\+\)\.\*\# and \/\/home\/dev\/((.*?)\/[^\/]+).*\# and both failed Don't you think the escaping makes the regex very unreadable? Am i using something wrong?

  Read the article

• Perl & PHP project requirement

  - by kiruthika

  Hi all, I have learned Perl and PHP.So I want to do simple real time project in this by that I can improve my knowledge in Perl and PHP. Can anyone suggest me any requirements. Thanks in Advance

  Read the article

• What's happening with Perl 6?

  - by Notitze

  Is there any visible progress? Is it now just an academic exercise? Do you believe Perl will continue to evolve with or without Perl 6 or will soon be forgotten?

  Read the article

• Piping input to a Java app with Perl

  - by user319479

  I need to write a Perl script that pipes input into a Java program. This is related to this, but that didn't help me. My issue is that the Java app doesn't get the print statements until I close the handle. What I found online was that $| needs to be set to something greater than 0, in which case newline characters will flush the buffer. This still doesn't work. This is the script: #! /usr/bin/perl -w use strict; use File::Basename; $|=1; open(TP, "| java -jar test.jar") or die "fail"; sleep(2); print TP "this is test 1\n"; print TP "this is test 2\n"; print "tests printed, waiting 5s\n"; sleep(5); print "wait over. closing handle...\n"; close TP; print "closed.\n"; print "sleeping for 5s...\n"; sleep(5); print "script finished!\n"; exit And here is a sample Java app: import java.util.Scanner; public class test{ public static void main( String[] args ){ Scanner sc = new Scanner( System.in ); int crashcount = 0; while( true ){ try{ String input = sc.nextLine(); System.out.println( ":: INPUT: " + input ); if( "bananas".equals(input) ){ break; } } catch( Exception e ){ System.out.println( ":: EXCEPTION: " + e.toString() ); crashcount++; if( crashcount == 5 ){ System.out.println( ":: Looks like stdin is broke" ); break; } } } System.out.println( ":: IT'S OVER!" ); return; } } The Java app should respond to receiving the test prints immediately, but it doesn't until the close statement in the Perl script. What am I doing wrong? Note: the fix can only be in the Perl script. The Java app can't be changed. Also, File::Basename is there because I'm using it in the real script.

  Read the article

• Has perl thread same advantage as kernel thread?

  - by Niraj Nawanit

  Kernel threads do context switch at kernel level instead of process level. I am planning to set up an httpserver in perl. I want to know if perl threads have same advantage as kernel threads from the perspective of context switch.

  Read the article

• Executing procedural queries in perl

  - by KalpaG

  I have a query like this set @valid_total:=0; set @invalid_total:=0; select week as weekno, measured_week,project_id as project, role_category_id as role_category, valid_count,valid_tickets, (@valid_total := @valid_total + valid_count) as valid_total, invalid_count,invalid_tickets, (@invalid_total := @invalid_total + invalid_count) as invalid_total from metric_fault_bug_project where measured_week = yearweek(curdate()) and role_category_id = 1 and project_id = 11; it executes fine in heidi (MySQL client) but when it comes to perl, it gives me this error DBD::mysql::st execute failed: You have an error in your SQL syntax; check the m anual that corresponds to your MySQL server version for the right syntax to use near ':=0; set :=0; select week as weekno, measured_week,project_id as project' at line 1 at D:\Mx\scripts\test.pl line 35. Can't execute SQL statement: You have an error in your SQL syntax; check the man ual that corresponds to your MySQL server version for the right syntax to use ne ar ':=0; set :=0; select week as weekno, measured_week,project_id as project' at line 1 The problem seem to be in the set @valid_total := 0; line. I am fairly new to Perl. Can anyone help? this is the complete perl code #!/usr/bin/perl #use lib '/x01/home/kalpag/libs'; use DBI; use strict; use warnings; my $sid = 'issues'; my $user = 'root'; my $passwd = 'kalpa'; my $connection = "DBI:mysql:database=$sid;host=localhost"; my $dbhh = DBI->connect( $connection, $user, $passwd) || die "Database connection not made: $DBI::errstr"; my $sql_query = 'set @valid_total:=0; set @invalid_total:=0; select week as weekno, measured_week,project_id, role_category_id as role_category, valid_count,valid_tickets, (@valid_total := @valid_total + valid_count) as valid_total, invalid_count,invalid_tickets, (@invalid_total := @invalid_total + invalid_count) as invalid_total from metric_fault_bug_project where measured_week = yearweek(curdate()) and role_category_id = 1 and project_id = 11'; my $sth = $dbhh->prepare($sql_query) or die "Can't prepare SQL statement: $DBI::errstr\n"; $sth->execute() or die "Can't execute SQL statement: $DBI::errstr\n"; while ( my @memory = $sth->fetchrow() ) { print "@memory \n"; }

  Read the article

• Perl: How to retrieve XMLHttpRequest

  - by Peterim

  Hi guys! I have a client-side appliction which submits some data via AJAX POST request (request.open("POST", url, flag)) to my Perl CGI script. How do I retrieve this data with Perl and return some other data (AJAX response) instead? Thank you!

  Read the article

• Perl php script auto install?

  - by Dr Hydralisk

  I was think of learning Perl cause I hear around town its good for system admin things. Would it be possible to use it to automatically install a php script? I need to install a custom script on a few different server and wanted to know how I could make something in Perl to do it (like move scripts over to directory and stuff)?

  Read the article

• Perl Cron Scheduler: start at x time, execute every y minutes forever

  - by Greg

  I'm using perl cron, and I want to make a rule like this run every xx min/hours starting at yy:yy time (until the end of time) How would I put this into a cron string? perl:cron seems to use the same syntax as regular cron so a regular cron string should work TIA!

  Read the article

• why does perl complain "Use of implicit split to @_ is deprecated"

  - by Haiyuan Zhang

  the code triger the complain is as below : #!/usr/bin/perl use strict; use warnings; my $s = "aaa bbb"; my $num_of_item = split(/\s+/, $) ; print $num_of_item; when I run the code, perl complains that "Use of implicit split to @_ is deprecated" . I really have no "context" for the problem, so expect you help to explain what's wrong with the code.

  Read the article

• Calling Perl and/or Python from Ruby

  - by Yktula

  Would it be possible to integrate Python (and/or Perl) and Ruby with some degree of transparency? I've looked at http://www.goto.info.waseda.ac.jp/~fukusima/ruby/python/doc/ and http://code.google.com/p/ruby-perl/ , but they both seem rather outdated. Perhaps this is not an appropriate approach, but would it be possible to generate a Ruby interface for Python's C API?

  Read the article

• Help to write webserver in Perl?

  - by Jon Skeet

  i has to write webserver with Perl. here what i have so far #!/usr/bin/perl what next? plz help me!! i am real jon skeet,not fake!

  Read the article

• casting udp streams in perl

  - by user314536

  hello. my Perl scripts gets a udp response that is built out of 2 integers + float numbers. the problem is that the udp streams is one long stream of bytes. how do i cast the stream into parameters using Perl ?

  Read the article

• $1 vs \1 in Perl regex substitutions

  - by Mr Foo Bar

  I'm debugging some code and wondered if there is any practical difference between $1 and \1 in Perl regex substitutions For example: my $package_name = "Some::Package::ButNotThis"; $package_name =~ s{^(\w+::\w+)}{$1}; print $package_name; # Some::Package This following line seems functionally equivalent: $package_name =~ s{^(\w+::w+)}{\1}; Are there subtle differences between these two statements? Do they behave differently in different versions of Perl?

  Read the article

• Perl Tk : Displaying window in bottom right Corner

  - by pavun_cool

  Hi All. I have planned to do the chatting the exercise Perl socket. In this I want to display the require window using Perl Tk . Here my requirement is that the window has to display in the bottom right corner . It is like Gmail Chat window. What I need to for achieve this thing. By default it displays in top left corner. Thanks in Advance

  Read the article

• Which IDE should I use to learn Perl?

  - by Befall

  I've got a few books and helpful guides to Perl from my company's scripting guy, but I can't seem to find where the best IDE for Perl is. Mind you, simple is better. I'm just learning for now.

  Read the article

• Calling a Perl Subroutine from Flex

  - by NLV

  Hello I'm new to Perl as well as Flex. I've just gone through the basic(and exciting) stuffs in both of them. I just want to call a Perl subroutine from Flex. Is it possible? If so how? Thank you NLV

  Read the article

• perl equivalent to awk /text/,/END/

  - by kSiR

  I am looking to replace a nasty shell script that uses awk to trim down some html, problem is I cannot find anything in perl that does the aforementioned function awk '/<TABLE\ WIDTH\=\"100\%\" BORDER\=1\ CELLSPACING\=0><TR\ class\=\"tabhead\"><TH>State<\/TH>/,/END/' How can I do this in perl?

  Read the article

• Perl script -need some help.

  - by benjamin button

  I have an sql file which will give me an output like below: 10|1 10|2 10|3 11|2 11|4 . . . I am using this in a perl script like below: my @tmp_cycledef = `sqlplus -s $connstr \@DLCycleState.sql`; after this above statement,since tmp_cycledef has all the output of the sql query i want to show the output as: 10 1,2,3 11 2,4 how could i do this using perl?

  Read the article

• Learning Perl, what to code in?

  - by Befall

  Hey all, I've got a few books and helpful guides to Perl from my company's scripting guy, but I can't seem to find where the best IDE for Perl is. Mind you, simple is better. I'm just learning for now. Thanks in advance!

  Read the article

• SIMPLE file reading in Perl

  - by Befall

  Hey guys, The other answered questions were a bit complicated for me, as I'm extremely new to using Perl. I'm curious how Perl reads in the files, how to tell it to advance to the next line in the text file, and how to make it read all lines in the .txt file until, for example, it reaches item "banana". Any and all help would be appreciated, thanks!

  Read the article

< Previous Page | 7 8 9 10 11 12 13 14 15 16 17 18  | Next Page >