$ perl 878546.pl
Enter a number
1
Enter second number
2
Enter third number
0
All numbers are same