Perl Print Problems in script

Shell Programming and Scripting
1

Hi Perl Gurus,

perl -e 'print "http://www.site@domain.com"'

The output of the above is :
http://www.site.com"
I want to print http://www.site@domain.com without using escape sequence before '@' like '\@'.
Is there any way to do this in perl?
Thanks,
Som

2

There are various ways:

perl -e "print 'http://www.site@domain.com'"
perl -e 'print q/http://www.site@domain.com/'
perl -e 'print "http://www.site\@domain.com"'