[ create a new paste ] login | about

Link: http://codepad.org/71lJ8zW1    [ raw code | output | fork ]

Perl, pasted on Nov 8:
1
2
3
4
5
6
7
8
9
10
11
12
use warnings;

my $str = 'http://www.ykt.ru/cgi-bin/go?http://ya.ru';
my $str2 = 'http://ya.ru';
if ($str == $str2)
{
    print "str = str2";
}
else 
{
    print "str != str2";
}


Output:
1
2
3
Argument "http://ya.ru" isn't numeric in numeric eq (==) at t.pl line 5.
Argument "http://www.ykt.ru/cgi-bin/go?http://ya.ru" isn't numeric in numeric eq (==) at t.pl line 5.
str = str2


Create a new paste based on this one


Comments: