Opened by [E|B] at 2004-08-11 20:59
User since
2003-08-08
2561 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-08
2561 Artikel
HausmeisterIn
HiHo!
Quick 'n dirty 'n untested. 8)
Code: (dl
)
1
2
3
4
my $output = `who`;
my ($ip) = $output =~ /^.*?(\d+\.\d+\.\d+\.\d+)$/gis;
my $ping = `ping -a $ip`;
print $ping;
Quick 'n dirty 'n untested. 8)
Gruß, Erik!
s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}
It's not a bug, it's a feature! - [CGI-World.de]
s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}
It's not a bug, it's a feature! - [CGI-World.de]