$apcontent =~ m/nick\"\>(.*)\<\/a\>/;
print "[User1 $1] ";