Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: win32 perl script when you don't know where perl is

by Corion (Patriarch)
on Jan 22, 2002 at 00:42 UTC ( #140481=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    @rem = '--*-Perl-*--
    @echo off
    ...
    
    require 5;
    ... Perl program begins ...
    
  2. or download this
    set DRIVES=c d e f g h
    echo Scanning for perl.exe
    for %%d in %DRIVES% dir %%d:\ /s /b perl.exe |find /i "Perl.exe"
    
  3. or download this
    perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ;    # The  
    $d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider
    ($c = $d->accept())->get_request(); $c->send_response( new   #in the
    HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' #  web
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://140481]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (4)
As of 2022-05-19 16:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (72 votes). Check out past polls.

    Notices?