Perl Net::RawIP not allowing broadcast ?

Hello, I have created the following piece of code: my $packet = new Net::RawIP({udp=>{}}); $packet-> set({ ip => { saddr => '192.168.0.15', daddr => '255.255.255.255', id => $ipid,

Re: perl net::rawip help

Hey, I figured it out, the documentation for Net::RawIP sucks by the way. I needed to change the line: $a = new Net::RawIP; to the following: $a = new Net::RawIP({udp=>{}}); Michael Michael Gale wrote: Hello, I have been trying to get a UDP packet sent out using Net::RawIP but

perl net::rawip help

Hello, I have been trying to get a UDP packet sent out using Net::RawIP but am having issues. Here is a peice I code I have tried for testing: my $a; my $p; my $f; my $ipid = int rand 5000 + 100; $a = new Net::RawIP; $a->set({ ip => {saddr => '192.168.0.15',

Re: Writing PNG data to a file

Toby Stuart wrote: use binmode my $png_data = get($http_request_string); open ( OUTPUT_HANDLE, "> $path/top_n.png" ); binmode OUTPUT_HANDLE; print OUTPUT_HANDLE $png_data; close OUTPUT_HANDLE; That's it. Thanks :) -- Daniel Kasak IT Developer NUS Consulting Group Level 5, 77 Pacific Hi

RE: Writing PNG data to a file

should probably have said 'look at the binmode function' rather than 'use binmode' so as not to confuse with use'ing a module :( -Original Message- From: Toby Stuart [mailto:[EMAIL PROTECTED] Sent: Monday, 15 August 2005 1:48 PM To: 'Daniel Kasak' Cc: 'beginners@perl.org' Subject: RE: Wri

RE: Writing PNG data to a file

use binmode my $png_data = get($http_request_string); open ( OUTPUT_HANDLE, "> $path/top_n.png" ); binmode OUTPUT_HANDLE; print OUTPUT_HANDLE $png_data; close OUTPUT_HANDLE; -Original Message- From: Daniel Kasak [mailto:[EMAIL PROTECTED] Sent: Monday, 15 August 2005 1:42 PM To: begin

Writing PNG data to a file

Hi all. I have some code that writes PNG data to a file, that works under Linux but not under Windows. The code: my $png_data = get($http_request_string); open ( OUTPUT_HANDLE, "> $path/top_n.png" ); print OUTPUT_HANDLE $png_data; close OUTPUT_HANDLE; Pretty simple, eh? A web server creates

[ANNOUNCE] Gtk2::Ex::DBI-1.2 and Gtk2::Ex::Datasheet::DBI-0.8

I'm pleased to announce the next round of updates to Axis Not Evil, a suit of Perl modules that combine to provide an alternative to a 'leading' software vendor's RAD design tool for database access. Project Page: http://entropy.homelinux.org/axis_not_evil/ Main changes for this release are th

Re: better option then getops ??

Michael Gale wrote: > Hello, Hello, > I was reading online about getops and it seems that with getops the > command line arguments have to be in the form: > > -character option > > What happens if you want your switchs to be characters like: > > --src_ip X.X.X.X > > Currently I have been usi

better option then getops ??

Hello, I was reading online about getops and it seems that with getops the command line arguments have to be in the form: -character option What happens if you want your switchs to be characters like: --src_ip X.X.X.X Currently I have been using a for loop and going through ARGV with a re

Re: parsing columns

On 8/14/05, Manav Mathur wrote: > > How do you logically determine that "l2dat4" in line 2 is column 4 and not > column 2?? > > Manav > Because as a human, I can see they are aligned. I guess a program will have to count whitespace, but then there is the issue of line 3... Regards, -- Offer K

Re: Scope

tmatsumoto am Samstag, 13. August 2005 19.06: > Hi, > > Thanks for the help. I've made the necessary changes. One error came up > at runtime on the "use warnings;". I gather the module is not installed > on the server I'm using. Strange; the pragma module warnings.pm is AFAIK part of the core per

Re: "$#{$array} "

i dunno "Tom Allison" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > Vineet Pande wrote: >> Hi, >> I don't not understand how the $#{$array_r} returns "highest" element as >> 4 and not 5??? >> >> #!/usr/bin/perl >> use warnings; >> use strict; >> my @array = (1,2,3,4,5); >> my $arr

Re: parsing columns

>Hi all, >I have a text file with columns, where the columns may not be aligned, >and not all lines may have data in all columns: > >header1 header2 header3header4 > >l1dat1l1dat2l1dat3 l1dat4 >l2dat1

Unicode Characters

Hello, I need to seperate unicode characters from a file containg utf8 text. I have tried: @charx = split //, $line; and $var = substr($line, 0, 1); but they fail to seperate chars as they seperate only one byte. I have put "use utf8;" it didnt change anything. I guess perl 5.8.0 have to handle u