/^\.{1,2}$/ perldoc perlre