hi

2 small problems.

i like to know how to close a program like Internet Explorer from perl.
the little script below seem to work for me, but i guess there must be
a cleaner and more correct way.

also i'm interesed in opening a browser with a valid internet address
as argument but i can't find out the syntax for mac os x - can anyone
give a hand with that?

thanks
./allan

# killing
my @output = `ps aux | grep '/Applications/Internet Explorer.app'`;

foreach my $line (@output) {
    if ($line =~
m,^\s*$ENV{LOGNAME}\s+(\d+).+\d+:\d+.\d+\s+/Applications/Internet
Explorer.app,) {
        system("kill", $1) 
    }
}

Reply via email to