Help for this page
# Your code $_ =~ /^(.*?)\*(.*?)\*(.*?)\*(.*?)\*(.*?)\*(.*?)\*(.*?)\*(.*?)\*(.*?) +\*(.*?)\*(.*?)$/; my $value1=$1;
# My code my ($value1) = split /\*/;
# Your code unless($value1 ne $ag) { s/$value1/$ag/g; $save_list=$save_list.$_; }
# My code if ($value1 ne $ag) { s/\Q$value1\E/$ag/; $save_list=$save_list.$_; }
www.com | www.net | www.org
No recent polls found