shutdown or reboot computer

[Jochen Friedmann]

Hello,

how can I reboot, shutdown(PowerOff) or change the user with a Perl Script ?

[Anno Siegel]

Jochen Friedmann <jochen.friedmann2@de.bosch.com> wrote in comp.lang.perl.misc:

> Hello,
>
> how can I reboot, shutdown(PowerOff) or change the user with a Perl Script ?

First answer the question how to reboot, shut down, or change the user
by any any means in your OS. Then ask yourself how to do the same things
in Perl.

Anno

[Jochen Friedmann]

Oh, sorry

the OS is Win2000 or WinnNT

"Anno Siegel" <anno4000@lublin.zrz.tu-berlin.de> wrote in message
news:bk478o$lt4$2@mamenchi.zrz.TU-Berlin.DE...

> Jochen Friedmann <jochen.friedmann2@de.bosch.com> wrote in

comp.lang.perl.misc:

> > Hello,
> >
> > how can I reboot, shutdown(PowerOff) or change the user with a Perl

Script ?

>
> First answer the question how to reboot, shut down, or change the user
> by any any means in your OS. Then ask yourself how to do the same things
> in Perl.
>
> Anno

[Bernard El-Hagin]

[Please don't top-post. Thanks]


Jochen Friedmann wrote:

> "Anno Siegel" <anno4000@lublin.zrz.tu-berlin.de> wrote in message
> news:bk478o$lt4$2@mamenchi.zrz.TU-Berlin.DE...

>> Jochen Friedmann <jochen.friedmann2@de.bosch.com> wrote in

> comp.lang.perl.misc:

>> > Hello,
>> >
>> > how can I reboot, shutdown(PowerOff) or change the user with a Perl

> Script ?

>>
>> First answer the question how to reboot, shut down, or change the
>> user by any any means in your OS. Then ask yourself how to do the
>> same things in Perl.

>
>
> Oh, sorry
>
> the OS is Win2000 or WinnNT

I think you misunderstood. This isn't a Perl question until you find out
(and tell us) how to achieve by other means what you're trying to achieve
with Perl. And no, by "other means" I don't mean pressing the power button.

:-)


--
Cheers,
Bernard
--
echo 42|perl -pe '$#="Just another Perl hacker,"'

[ko]

Jochen Friedmann wrote:

> Hello,
>
> how can I reboot, shutdown(PowerOff) or change the user with a Perl Script ?
>
>

Please read the posting guidelines under what you 'Really Really Should'
do before posting - you may find your answer quicker that way:

[url]http://mail.augustmail.com/~tadmc/clpmisc.shtml[/url]

Google search in comp.lang.perl.misc for 'windows shutdown' group (2nd
match) turns up the following (may be wrapped):

[url]http://groups.google.com/groups?q=windows+shutdown+group:comp.lang.perl.mis c&hl=en&lr=&ie=UTF-8&group=comp.lang.perl.misc&selm=E16x2.3175%24lx.1 210%40news2.giganews.com&rnum=2[/url]

Or you could have tried 'perldoc win32' and found the Win32
InitiateSystemShutdown() function.

HTH - keith

[Cyde Weys]

Jochen Friedmann wrote:

> Hello,
>
> how can I reboot, shutdown(PowerOff) or change the user with a Perl Script ?
>
>

system('shutdown -h now');
system('reboot');
system("su -l $newUser");

[Thomas Kratz]

"Thomas Kratz" <ThomasKratz@REMOVEwebCAPS.de> wrote in news:3f65b0db.0@juno.wiesbaden.netsurf.de...

>
> "Jochen Friedmann" <jochen.friedmann2@de.bosch.com> wrote in news:bk48ef$e0k$1@ns2.fe.internet.bosch.com...

> > Oh, sorry
> >
> > the OS is Win2000 or WinnNT
> >

>
> The script below provides two functions for reboot and shutdown and should work for nt to xp.
>
> Thomas

I forgot to mention, that prior to calling Reboot or Powerdown, you'll have to call AdjustToken() first and check for success. And the print statements should be removed for production :-)

Thomas

[Abigail]

Jochen Friedmann (jochen.friedmann2@de.bosch.com) wrote on MMMDCLXVII
September MCMXCIII in <URL:news:bk48ef$e0k$1@ns2.fe.internet.bosch.com >:
__ Oh, sorry
__
__ the OS is Win2000 or WinnNT


Oh, fastest way to shutdown Win2000 from Perl that I know is:

print "\t\t\b\b\b\b\b\b\b\b\b\b\b\b" while 1;


Although this might be fixed with some patch.


Abigail
--
perl -wleprint -eqq-@{[ -eqw+ -eJust -eanother -ePerl -eHacker -e+]}-