#! /usr/bin/perl
use strict;
use warnings;

use utf8;

my $input = 'TEXT: "C:\temp\test äbc.txt"';

print $input =~ /.*TEXT:\s+".*[\\]([^\\"]+)"/;
#                            ~  ~   ~ ~