User Control Panel
Advertisements

HELP US, HELP YOU!

MS DOS Error On Perl!

 
Post new topic   Reply to topic    Bot Depot Forum Index -> Perl
View unanswered posts
Author Message
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sat Jan 24, 2004 9:10 pm    Post subject: Reply with quote

im making a bot in perl when i typed perl bot.pl(after i did all those other CD things) then i got the following error!!


C:\ActivePerl\Perl\bin>perl bot.pl
Possible unintended interpolation of @hotmail in string at bot.pl line 14.
Possible unintended interpolation of @tranceaddict in string at bot.pl line 20.
Name "main::hotmail" used only once: possible typo at bot.pl line 14.
Name "main::tranceaddict" used only once: possible typo at bot.pl line 20.


Including on_im.pl.. OK!
Including docrypt.pl.. OK!
Including commands.pl.. OK!
Including log_im.pl.. OK!
Including thought.pl.. OK!
(3)TX: VER 0 MSNP2
print() on closed filehandle LOG at C:/ActivePerl/Perl/lib/MSN.pm line 77.
(3)RX: VER 0 0
print() on closed filehandle LOG at C:/ActivePerl/Perl/lib/MSN.pm line 77, > line 1.
Use of uninitialized value in concatenation (.) or string at C:/ActivePerl/Perl/
lib/MSN.pm line 34, line 1.
(3)TX: INF 1
print() on closed filehandle LOG at C:/ActivePerl/Perl/lib/MSN.pm line 77, > line 1.

C:\ActivePerl\Perl\bin>



before that part happend my nortan asked if it could accesse the net i accepted then this came up!


(3)TX: VER 0 MSNP2
print() on closed filehandle LOG at C:/ActivePerl/Perl/lib/MSN.pm line 77.
(3)RX: VER 0 0
print() on closed filehandle LOG at C:/ActivePerl/Perl/lib/MSN.pm line 77, > line 1.
Use of uninitialized value in concatenation (.) or string at C:/ActivePerl/Perl/
lib/MSN.pm line 34, line 1.
(3)TX: INF 1
print() on closed filehandle LOG at C:/ActivePerl/Perl/lib/MSN.pm line 77, > line 1.




If you can help me it is very much apreatiated!!
Back to top
Mojave
Almost An Agent
Almost An Agent


Joined: 01 Nov 2003
Posts: 1434

Reputation: 66.4

PostPosted: Sat Jan 24, 2004 9:16 pm    Post subject: Reply with quote

The first thing you should do is intall the latest MSN.pm and make sure you have the SSL fix.

To fix the unintended interpolation errors, you need to escape the @ symbol inside double quoted strings or use single quoted strings.

Code:
$handle = "email\@domain.com";


or

Code:
$handle = 'email@domain.com';


Either should work.

That should get you much farther along.
Back to top
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sat Jan 24, 2004 9:47 pm    Post subject: Reply with quote

Ok i did that the @hotmail errors are now cleared but I got the following:

C:\ActivePerl\Perl\bin>perl bot.pl
Can't locate Event/Handler.pm in @INC (@INC contains: C:/ActivePerl/Perl/lib C:/
ActivePerl/Perl/site/lib .) at C:/ActivePerl/Perl/lib/MSN.pm line 112.
BEGIN failed--compilation aborted at C:/ActivePerl/Perl/lib/MSN.pm line 112.
Compilation failed in require at bot.pl line 56.
BEGIN failed--compilation aborted at bot.pl line 56.


handeler.pm?? where is that?
Back to top
Keenie
Almost An Agent
Almost An Agent


Joined: 31 Oct 2003
Posts: 1071

Reputation: 52.4

PostPosted: Sat Jan 24, 2004 9:49 pm    Post subject: Reply with quote

i dont think its included in the latest one, go into one of the older msn.pm topics here and download the zip and extract Handler.pm to
C:\ActivePerl\Perl\lib\Event
Back to top
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sat Jan 24, 2004 10:30 pm    Post subject: Reply with quote

ok i got another version of handler.pm but in the lib directory there is no Event directory so i made a new one extracted handler.pm into the Event directory i made now i did perl bot.pl in ms dos this is what i got:


C:\ActivePerl\Perl\bin>perl bot.pl
MSN Module v. 1.3.4
Checksum:49995



Including on_im.pl.. OK!
Including coadmin.pl.. OK!
Including docrypt.pl.. OK!
Including commands.pl.. OK!
Including log_im.pl.. OK!
Including thought.pl.. OK!
Cannont create object without both Handle and Password being set.
at bot.pl line 74

C:\ActivePerl\Perl\bin>




Thanks For ALL Your Help!!


-----EDITED: Where is line 74??
Back to top
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sat Jan 24, 2004 10:42 pm    Post subject: Reply with quote

Please help :unsure:
Back to top
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sat Jan 24, 2004 10:45 pm    Post subject: Reply with quote

...waits for somone to help my prob...... :unsure:


ADVERTISEMENT:

FastReply! Got some help but not enuf time?? Use FastReply Wink Very Happy


ADVERTISEMENT:

Tom Clancys Splinter Cell:

You are Sam Fisher.
You have the right to spy,steal,and assassinate to ensure that American freedoms are protected.If captured,the *lazy*.S. goverment will disavow any knowledge of your existance.
You Are A Splinter Cell
Back to top
eric256
The Keymaker
The Keymaker


Joined: 03 May 2006
Posts: 2292
Location: Colorado
Reputation: 47Reputation: 47Reputation: 47Reputation: 47Reputation: 47

PostPosted: Sat Jan 24, 2004 10:53 pm    Post subject: Reply with quote

Dude chill. I understand you are in a rush but the rest of use have lives. The error you are getting means that you are not using MSN.pm correctly. Open MSN.pm and go to the bottum, there is a complete example bot included in the source code. oh and don't forget to chill.
_________________
Eric256
Proud previous owner and current admin of Bot-depot.com
Back to top
zander
God Like
God Like


Joined: 14 Jan 2004
Posts: 540
Location: england
Reputation: 66.6

PostPosted: Sat Jan 24, 2004 10:54 pm    Post subject: Reply with quote

its bad to to reply 3 times in a row as eric is going to say probs

EDIT: he beat me to it
Back to top
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sat Jan 24, 2004 10:56 pm    Post subject: Reply with quote

Sorry about that. Hope *lazy* forgive me... what eric said go to the bottom and full sorce example, is this what you mean?:
Code:
#Try to connect to the MSN server.<br />$client->connect("$handle","$password", '', { <br />    Status  => \&Status, <br />    Answer  => \&Answer, <br />    Message => \&Message, <br />    Join    => \&Join }<br />) or die "Error: Cannot connect to the MSN server!";<br />



Thanks!

Again Sorry About the other posts!

EDIT: who beat *lazy* to what?


[you get paid to be annoying? Damn i need that job] -- removed "advertisments by moron"
Back to top
zander
God Like
God Like


Joined: 14 Jan 2004
Posts: 540
Location: england
Reputation: 66.6

PostPosted: Sat Jan 24, 2004 11:03 pm    Post subject: Reply with quote

erioc beat me to saying you didnt need to post 3 times in a row
Back to top
Keenie
Almost An Agent
Almost An Agent


Joined: 31 Oct 2003
Posts: 1071

Reputation: 52.4

PostPosted: Sun Jan 25, 2004 12:11 am    Post subject: Reply with quote

that example is NOT in msn.pm

also, if you want us to take you seriously stop posting the useless advertising crap

heres the example thats in msn.pm, make sure you bot follows the same structure for connecting, or you could go to the downloads section and get a bot that works

Code:
use MSN;<br />    <br />    my $Email = 'email@msn.com';<br />    my $Password = 'big secret password';<br />    <br />    my $msn = MSN->new(Handle => $Email, Password => $Password);<br />    <br />    $msn->set_handler(Connected => \&Connected);<br />    $msn->set_handler(Message   => \&Message);<br />    $msn->set_handler(Answer    => \&Answer);<br />    $msn->set_handler(Join    => \&Join);<br />    $msn->set_handler(Update_Chat_Buddies => \&UpdateBuddies);<br />    <br />    $msn->connect();<br />    <br />    while (1)<br />    {<br />        $msn->do_one_loop;<br />    }<br />    <br />    sub Message {<br />        my ($self, $victim, $name, $msg) = @_;<br />        $msg =~ s/<(|\n)+?>//g;<br />        $self->sendmsg($msg);<br />    }<br />    <br />    sub Connected {<br />        my $self = shift;<br />        warn "Calling Eric!";<br />        $msn->call('eric256@rocketmail.com',"Dude");<br />    }<br />    <br />    sub Answer {<br />        my ($self, $username) = @_;<br />        $self->sendmsg("I don't know anything!");<br />    }<br />    <br />    sub Join {<br />        my ($self,$user,$friendly) = @_;<br />        $self->sendmsg("Welcome $user");<br />    }<br />    <br />    sub UpdateBuddies<br />    {<br />        my $self = shift;<br />        $self->sendmsg("Hello " . join(",", map {$self->{Buddies}->{$_}} keys %{$self->{Buddies}}));<br />    }<br />    1;
Back to top
Tom Clancy
Young One
Young One


Joined: 24 Jan 2004
Posts: 57

Reputation: 28.9Reputation: 28.9Reputation: 28.9

PostPosted: Sun Jan 25, 2004 9:38 pm    Post subject: Reply with quote

ok i got another bot templeate from: http://www.bot-depot.com/forums/index.php?showtopic=166

it worked but, when i log on my msn it doesn't show my bot online...

here's what it said on MS DOS (When my nortan alerted me to grant accsess to the net):
C:\ActivePerl\Perl\bin>perl bot.pl


Including on_im.pl.. OK!
Including coadmin.pl.. OK!
Including docrypt.pl.. OK!
Including commands.pl.. OK!
Including log_im.pl.. OK!
Including thought.pl.. OK!
Defined Connect
Defined Message
Defined Answer
Defined Join

MSN Module v. 1.2.1




after that nothing happends!
Back to top
Mojave
Almost An Agent
Almost An Agent


Joined: 01 Nov 2003
Posts: 1434

Reputation: 66.4

PostPosted: Sun Jan 25, 2004 9:55 pm    Post subject: Reply with quote

First, you should use the latest version of MSN.pm (1.3.5), since it includes many new functionality changes and bug fixes.

Second, I wouldn't use any of the old wiredbots code because it won't work with the above MSN module. You'd have to use an older MSN which you probably won't find much support for. Try Andromeda Bot. When you run it, it asks for your bots handle and password and a few other configuration options and then it just WORKS! It works great, nothing could be easier. And you'll get lots of support and find lots of commands and add-on code for it.
Back to top
Display posts from previous:   
Post new topic   Reply to topic    Bot Depot Forum Index -> Perl All times are GMT
Page 1 of 1

 



Protected by phpBB Security phpBB-TweakS
phpBB Security Has Blocked 9 Exploit Attempts.
Antispam Captcha Mod by phpbb-security.com
Powered by phpBB © 2001, 2005 phpBB Group