Re: Matching @ in string

You have introduced the array @t which is interpolated. So you have to quote the @ (or write q{h@t}).

    perl -e 'if ("h\@t" =~ /(\@)/ ) { print $1 }'
[download]

Example for an array interpolation:

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

    my @friends = ('Margaret', 'Richard', 'Carolyn', 
                   'Rohan', 'Cathy', 'Yukiko');
    print "Friends: @friends\n";
[download]

Comment on Re: Matching @ in string Select or Download Code

Replies are listed 'Best First'.
Re^2: Matching @ in string by loris (Hermit) on Nov 22, 2007 at 13:49 UTC
OK, so I was missing something obvious. But if I don't want to modify the string by escaping the @ and I want to run program as a one-liner, how do I do it if I can't escape the single quotes as you point out here? Thanks, loris "It took Loris ten minutes to eat a satsuma . . . twenty minutes to get from one end of his branch to the other . . . and an hour to scratch his bottom. But Slow Loris didn't care. He had a secret . . ." (from "Slow Loris" by Alexis Deacon)	[reply]
Re^3: Matching @ in string by dwu (Monk) on Nov 22, 2007 at 13:52 UTC
`perl -e 'if (q{h@t} =~ /(\@)/ ) { print $1 }'` [download] See perlop for the `q` operator; look under "Regexp Quote-Like Operators", and a few scrolls down from that :) PS: Your link to Re^3: Matching @ in string is broken because you did `node=id` instead of `node_id` - see What shortcuts can I use for linking to other information? for better, more efficient means of linking to information on Perlmonks.	[reply] [d/l] [select]
Re^3: Matching @ in string by mwah (Hermit) on Nov 22, 2007 at 14:34 UTC
... don't want to modify the string by escaping the @ and I want to run program as a one-liner, how do I do it if I can't escape the single quotes Try: ... `perl -e "print 'h@t'=~ /\@/g"` [download] or even `echo 'h@t' \| perl -ne 'print /\@/g'` [download] ... depending on the type of problem you are about to solve. Regards mwa	[reply] [d/l] [select]