suppose my user name is abc@$%, it is not getting stored in the user name filed. What can be the problem here. Thanks NTsub search_for_username_and_no_of_questions { for(;$index<@records;$index++) { if ($records[$index] =~ /userName\s+:\[(..*)\]/) { $User_Name = $1; print "User_Name = $User_Name\n"; $User_Name =~ s/\s+//g; for(;$index<@records;$index++) { if ($records[$index] =~ /Set\s+of\s+questions\(bitmap\ +)\s+selected\s+:\s+(\d+)/) { print "Inside set of questions bitmap selected\n"; $Bitmap_Number_For_Questions = $1; $no_of_questions{$User_Name}=$Bitmap_Number_For_Qu +estions; print "$Bitmap_Number_For_Questions is no of quest +ions for $User_Name\n"; $timestamp{$User_Name}=$Time_Stamp; print "$Time_Stamp is time stamp for $User_Name\n" +; return 0; } } } } }
20090809 Janitored by Corion: Restored content, as per Writeup Formatting Tips
In reply to special characters storage in perl by namishtiwari
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |