fopen( FILE, ">$memberdir/$member{'username'}.kri", 1); print FILE "$FORM{'title1'}\n"; print FILE "$FORM{'title2'}\n"; print FILE "$FORM{'title3'}\n"; print FILE "$FORM{'title4'}\n"; print FILE "$FORM{'title5'}\n"; fclose(FILE);
if($settings[7] eq "Administrator") { fopen( FILE, ">$memberdir/$member{'username'}.kri", 1); print FILE "$FORM{'title1'}\n"; print FILE "$FORM{'title2'}\n"; print FILE "$FORM{'title3'}\n"; print FILE "$FORM{'title4'}\n"; print FILE "$FORM{'title5'}\n"; fclose(FILE); }
fopen(FILE, "$memberdir/$INFO{'username'}.kri"); @krimodsettings=<FILE>; fclose(FILE);
foreach $value (@krimodsettings) { chomp $value; }
fopen(FILE, "$memberdir/$INFO{'username'}.kri"); @krimodsettings=<FILE>; fclose(FILE); foreach $value (@krimodsettings) { chomp $value; }
unless(0) { stab("LoonyPandora"); next; }