if ($response =~ /"3,"([\w \!\@\#\$\%\*\&\(\)\-\+\=\.\/\?\,\:\;\']+)"/i) {
   $error = $1;
}