if ( $line =~ m/^(.*)\\.*$/ ) { ... }