#!/usr/bin/perl use strict; use warnings; use Data::Dumper; my $string = '\\w'; print $string; print "\n"; print Dumper $string;