--8<---
use 5.016;
use warnings;

my $title = "single quotes not allowing in perl";

$title =~ m/^([a-zA-Z0-9 \.\-\(\)\%\&\:\;\,\"\']+)$/ and
    say "Title matches original re";
$title =~ m/^([-a-zA-Z0-9 .()%&:;,"']+)$/ and
    say "Title matches simplified re";
-->8---

=>

Title matches original re
Title matches simplified re