m/^"{1}[^"{1}]/
#   ^^^   ^^^-This is wrong
#    |
#   This is unnecessary

##</code><code>##

use strict;
use warnings;
use feature 'say';

my @strings = ('"18/02/2018"', '"28/02/2018"');

for (@strings) {
    say if /^"[^"]/;
}