winxp sp2 firewall and perl programs

2005-09-11 Thread assistent
i All! I have local network with windows and linux boxes. When winxp firewall is on on windows box I can't FTP & telnet connect from this box to linux boxes -connecting to windows boxes is no problem. Need some advice howto overcome this problem short of disabling winxp firewall.

Re: Re: winxp sp2 firewall and perl programs

2005-09-12 Thread assistent
Mon, 12 Sep 2005 05:14:51 UT, [EMAIL PROTECTED] <[EMAIL PROTECTED]>: >> i All! >> I have local network >> with windows and linux boxes. >> When winxp firewall is on on windows box >> I can't FTP & telnet >> connect from this box to linux boxes >> -connecting to windows boxes is no problem. >> Nee

Re: Re: winxp sp2 firewall and perl programs

2005-09-13 Thread assistent
resolved Mon, 12 Sep 2005 05:14:51 UT, [EMAIL PROTECTED] <[EMAIL PROTECTED]>: i All! I have local network with windows and linux boxes. When winxp firewall is on on windows box I can't FTP & telnet connect from this box to linux boxes -connecting to windows boxes is >>

perl Gimp question

2005-09-22 Thread assistent
i All! Is there a possibility of Gimp perl module to work with ActiveState perl distribution ? If not howto get cygwin perl5.8 distributiom ? Can both versions of perl work on same box? ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveSta

Wnn32::Procecc question

2005-09-28 Thread assistent
Hi All! I Have 2 perl scripts first script calls Win32::Process::Create and exits in second script I want to kill process created in first script But how I can pass $procobj to second script to kill it like <$procobj->Kill($exi)> Or how can I in first script get $pid of process from $procobj? ___

perldoc question

2005-09-28 Thread assistent
[EMAIL PROTECTED] wrote: > Hi All! > I Have 2 perl scripts > first script calls Win32::Process::Create > and exits > in second script I want to kill > process created in first script > But how I can pass $procobj to second > script to kill it like <$procobj->Kill($exi)> > Or how can I in first s

re: convert winword ...

2005-10-21 Thread assistent
hen coping with the rtf thing, I encountered a problem. I used the script that comes in the module, but as I didn't understand I modified it to: #!/usr/bin/perl require RTF::TEXT::Converter; my $inputfile="document.rtf"; my $outputfile="document.txt"; open(IN,"<$inputfile") or die; open(OUT,">$ou

on weird perl/tk behavior in new version of perl

2005-11-13 Thread assistent
i ALL! I HAVE "OLD" version of perl = perl -v: This is perl, v5.8.6 built for MSWin32-x86-multi-thread (with 3 registered patches, see perl -V for more detail) Copyright 1987-2004, Larry Wall Binary build 811 provided by ActiveState Corp. http://www.ActiveState.com ActiveState is a division

Re:Working example of code that runs as EXCEL macro/module

2005-12-14 Thread assistent
Phil ! you wrote : === I want to run perl code as a function/module inside EXCEL, in the same way that one can run VBA. === yr wish as stated above seem to me rather strange /not to say more/ For my part I never had such a wish - working with both perl & VBA. Am I missing some point here ? Can yu

WMI problem ?

2005-12-29 Thread assistent
hello list! I am trying to write Perl program to get some WMI info remotely from machines on local network (workgroup , no domain ) I understand that it is no Perl problem : but I am stuck with this - I can't connect to remote machines at all with WMI ! I am using Winxp SP2 I disabled windows fire

IO::Select perl question

2006-04-05 Thread assistent
Hi All! I am trying to use pipes in win32 in my main program (in C) I have: FILE *fd = _popen("perl d:/umts/catch_in.pl" , "wb"); int i=12; fwrite((void*)&i,1,4,fd); ie=fflush(fd); _pclose(fd); my perl code (in catch_in.pl) is : - use strict; use warnin

perl Tk font question

2004-07-13 Thread assistent
It may be simple but I can't figure how to set font in tk widget /my font is cyrillic font/ please help ! ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

another perl Tk font questio

2004-07-13 Thread assistent
>It may be simple but >I can't figure how to set font >in tk widget /my font is cyrillic font/ >please help ! >___ use Tk; use strict; my $top = MainWindow->new(); my $text = $top->Label( -font => '{Courier New Cyr} 32', -text => 'Try me',)->p

RE:RE: another perl Tk font questio

2004-07-14 Thread assistent
>>It may be simple but >>I can't figure how to set font >>in tk widget /my font is cyrillic font/ >>please help ! >>___ > [code snip] >If your font name has more than one word in it, you need to put it >between braces like mentioned above. >32 is just

WWW::Mechanize question

2004-10-27 Thread assistent
hi ALL! MY questions are : 1) How to click on image in the page ?/not on button/ 2) How to work with dropdown boxes ? 3) how to find coordinates x and y on page ? ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveSt

Tk::Table cusom keys scrolll question Hi All! I am trying to use Tk::Table consisting of Entry widgets ... Does anybody knows how to impement scroll keys ? this phrase from the docs: I dont understand above text. I want , for example, after key go to the next cell/next col in the row or 1-st col in the next row if on the last col/ Snippets are welcome especially !

2004-11-19 Thread assistent
Tk::Table cusom keys scrolll question Hi All! I am trying to use Tk::Table consisting of Entry widgets ... Does anybody knows how to impement scroll keys ? this phrase from the docs: I dont understand above text. I want , for example, after key go to the next cell/next col in the row or 1-st col

RE:RE:Tk::Table cusom keys scrolll question >-----Original Message----- >> From: [EMAIL PROTECTED] >> [mailto:[EMAIL PROTECTED] On >> Behalf Of [EMAIL PROTECTED] >> Sent: November 19, 2004 3:07 AM >> To: perl-win32-users@listserv.ActiveState.com >> Subject: Tk::Table cusom keys scrolll question That has to be the longest subject line I've ever seen? **** THIS WAS cut and paste error on my side ! >> >> Tk::Table cusom keys scrolll question >> Hi All! >> I am trying to use >> Tk::Table consisting of Entry widgets ... >> Does anybody knows how to impement scroll keys ? If you "only" have entry widgets - then I would question your need to use Tk::Table at all. Why not just grid or pack your widgets and let the packing hierarchy determine your focus (previous and next) policy. If you have too many entry widgets and not enough space try a Scrolled('Pane'). >> this phrase from the docs: >> > cursor and scroll keys scroll the displayed widgets.> I dont >> understand above text. What this means is that keyboard focus policies will (or should) work if you set -takefocus=>1 >> I want , for example, after key >> go to the next cell/next col in the row or 1-st col in the >> next row if on the last col/ Snippets are welcome especially ! Typically a moves you to the next widget and a moves you backwards. Try it out - but again - reconsider your use of Tk::Table - it seems like extra overhead you don't really need. Jack _________ thanks ! may be you suggest how I can pack my widgets to get matrix of predefined number rows and cols ? thank in advance !

2004-11-21 Thread assistent
RE:RE:Tk::Table cusom keys scrolll question >-Original Message- >> From: [EMAIL PROTECTED] >> [mailto:[EMAIL PROTECTED] On >> Behalf Of [EMAIL PROTECTED] >> Sent: November 19, 2004 3:07 AM >> To: [EMAIL PROTECTED] >> Subject: Tk::Table cusom keys scrolll question That has to be the l

RE:RE:Tk::Table custom keys scroll question >-----Original Message----- >> From: [EMAIL PROTECTED] >> [mailto:[EMAIL PROTECTED] On >> Behalf Of [EMAIL PROTECTED] >> Sent: November 21, 2004 10:28 PM >> To: perl-win32-users@listserv.ActiveState.com >> Subject: RE:RE:Tk::Table cusom keys scrolll question >> _________ >> thanks ! >> may be you suggest >> how I can pack my widgets to >> get matrix of predefined number rows and cols ? >> thank in advance ! What are you actually trying to do? I may have given you some poor advice. Usually when someone wants to grid a bunch of Entry widgets - I start thinking "spreadsheet". If that is indeed your purpose then don't heed my previous advice. Instead use Tk::TableMatrix !! ##################### use Tk::TableMatrix; use Tk; my $var = {}; foreach my $row (0..50){ foreach my $col (0..20){ $var->{"$row,$col"} = "Row$row Col$col"; } } my $mw=tkinit; my $tm = $mw->Scrolled('TableMatrix', -scrollbars=>'se', -bg=>'white', -rows=>51, -cols=>21, -variable=>\$var)->pack(-expand=>1, -fill=>'both'); MainLoop; __END__ perldoc Tk::TableMatrix ##################### If you still wish to just use a bunch of entries for whatever your purpose - then here is a simple example of 'grid'ding some entry widgets: ##################### use Tk; use Tk::Pane; use strict; my @entry; my $mw=tkinit; my $pane = $mw->Scrolled('Pane')->pack(-expand=>1, -fill=>'both'); foreach my $row (0..50) { foreach my $col (0..20) { $entry[$row][$col] = $pane->Entry( -text=>"Row $row Col $col") ->grid(-row=>$row, -column=>$col); } } MainLoop; __END__ perldoc Tk::grid ##################### There are other table-like widgets but TableMatrix is the most powerful and most efficient. It all depends on your purpose. Jack <<<<<<<<<<<< thank you ! My purpose is : I am looking for a possibility of migrating of some my old vb database applications to perl. 1)In vb there is Visual Data Manager (visdata app) Is there some analog of it in perl ? 2)I would like example of analog of databound DataGrid control /in perl/ for browsing tables 3)And I have some Clipper5 apps which extensively use custom browsing : key in last row appends a new row with some cells having values predicted from few above cells. How To achieve this in perl Tk?

2004-11-22 Thread assistent
RE:RE:Tk::Table custom keys scroll question >-Original Message- >> From: [EMAIL PROTECTED] >> [mailto:[EMAIL PROTECTED] On >> Behalf Of [EMAIL PROTECTED] >> Sent: November 21, 2004 10:28 PM >> To: [EMAIL PROTECTED] >> Subject: RE:RE:Tk::Table cusom keys scrolll question >> _ >> t

on reading sms messages from mobile phone Hi all! I have siemens c55 mobile connected to my pc I also have programm "phone data suite" which allows for reading incoming sms messages from mobile. aforementioned programm from my point of view is "thing in itself" : it is menu driven and have no description of format of .sm files in which are stored sms messages. My question - is there a way of reading sms in perl ? may be for other types of mobiles ? and lastly - may be there are programs for reading sms on Linux ?

2004-12-14 Thread assistent
on reading sms messages from mobile phone Hi all! I have siemens c55 mobile connected to my pc I also have programm "phone data suite" which allows for reading incoming sms messages from mobile. aforementioned programm from my point of view is "thing in itself" : it is menu driven and have no desc

net::telnet question

2004-12-30 Thread assistent
Hi! Is there telnet server for windows98 which works with Net::Telnet ? I downloaded some 6 servers some of them are not working at all,some does't work with Net::Telnet And 2-nd question: how to start fixed program/without params/ on windows98 box from linux box (on a local network) ? ___

Re:Re: net::telnet (and perl sockets) question

2005-01-05 Thread assistent
[EMAIL PROTECTED] wrote: > And 2-nd question: > how to start fixed program/without params/ on windows98 box > from linux box (on a local network) ? > You can 'use IO::Socket;' on the Windows box to set up a simple server, and 'use IO::Socket;' on the linux box to send the "start" message to the

perl tk binding question

2005-03-10 Thread assistent
i All! In following snippet I have 2 parallel arrays @list and @data and I want on selecting entry in listbox to see corresponding data array element in textbox using UP and DOWN arrows is OK but I have to make 2 mouse clicks to make right selection! MY question - how to modify this scheme to ma

Gimp 2.0 question

2005-03-24 Thread assistent
Hi all! I have Activestate Perl build 810 Is there a possibility of using Gimp 2.0 perl package in this version of perl ? ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/

netscape mail perl question

2005-04-04 Thread assistent
Hi All! after my outlook express died unexpectedly I use Netscape Mail MY question is: I used Mail::Transport::Dbx to get outlook express mail messages/writing mess's to database/ Which perl module i am to use to get mail messages from Netscape ? ___ Pe

Re: [OT] Spam to list

2005-04-05 Thread assistent
At 10:20 AM 4/5/05 -0700, $Bill Luebkert wrote: >>So you have the right attitude, but now you need training. And >>since your using Lotus Notes, your boss may need training too. :) All PHB's are in need of training. === I get this acronym: PHB Psycho Hose Beast ??

perl Win32::GuiTest question

2005-04-17 Thread assistent
Hi Perl users! Is there a way of reading content of MFC Grid control ? thank you ! ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

how to get list of all possible methods

2005-05-11 Thread assistent
I installed Mail::MboxParser module In SYNOPSIS section of the docs +++ my $mb = Mail::MboxParser->new('some_mailbox', decode => 'ALL', parseropts => $parseropts); # --- #

need help with utf8

2005-05-22 Thread assistent
Hi All! I need to extract attachments from mail in Perl this i can do,but filenames when in cyrillic are wrong typical filename in mail message looks like my $name="=?UTF-8?B?0L8xX9C80LXRgdGP0YfQvdCw0Y8ucnRm?="; i need to convert this to utf8 and then to cp1251 How precisely to do this ? _

Re:Re: need help with utf8

2005-05-23 Thread assistent
[EMAIL PROTECTED] [a], on Monday, May 23, 2005 at 05:12 (UT) wrote: a> typical filename in mail message looks like a> my $name="=?UTF-8?B?0L8xX9C80LXRgdGP0YfQvdCw0Y8ucnRm?="; a> i need to convert this to utf8 and then to cp1251 a> How precisely to do this ? I think you have to decode this via MIM

perl Tk question

2005-06-01 Thread assistent
Hi All! In the following snippet: use strict; use Tk; require Tk::LabFrame; my $top = new MainWindow; my $bar=$top->LabFrame(-label => 'buttons bar'); $bar->pack; my $exi=$bar->Button(-command=>\&exi,-text=>'exit'); $exi->pack(-side=>'left'); my $prg=$bar->Button(-command=>\&prg,-text=>'prg');

Re:Re: perl Tk question

2005-06-01 Thread assistent
[EMAIL PROTECTED] wrote: >> Hi All! >> In the following snippet: >> >> use strict; >> use Tk; >> require Tk::LabFrame; >> my $top = new MainWindow; >> my $bar=$top->LabFrame(-label => 'buttons bar'); >> $bar->pack; >> my $exi=$bar->Button(-command=>\&exi,-text=>'exit'); >> $exi->pack(-side=>'