Help for this page
#!/usr/bin/perl use warnings; ... print "$query = $answer\n"; }
#!/usr/bin/perl use warnings; ... ($error,$answer)=('',''); }