Codeq
16.05.2002, 21:48
Hi
bin grad am rumfummeln in nem source der sich mit unix sockets befasst, aber ich werd nicht aus zB so einer Zeile schlau
sub user_mod{
my($channel,$action,$mode,$user)=@_;
$channel = lc($channel);
$mode = "op" if $mode eq "o";
$mode = "halfop" if $mode eq "h";
$mode = "voice" if $mode eq "v";
if($action eq "+") {
$channels{$channel}{users}{$user}{$mode} = 1;
}else{
delete($channels{$channel}{users}{$user}{$mode});
}
}
die zeilen der letzten beiden bedingungen kapier ich ned so ganz.. was macht dieses {} ??
bin grad am rumfummeln in nem source der sich mit unix sockets befasst, aber ich werd nicht aus zB so einer Zeile schlau
sub user_mod{
my($channel,$action,$mode,$user)=@_;
$channel = lc($channel);
$mode = "op" if $mode eq "o";
$mode = "halfop" if $mode eq "h";
$mode = "voice" if $mode eq "v";
if($action eq "+") {
$channels{$channel}{users}{$user}{$mode} = 1;
}else{
delete($channels{$channel}{users}{$user}{$mode});
}
}
die zeilen der letzten beiden bedingungen kapier ich ned so ganz.. was macht dieses {} ??