#!/usr/bin/perl
$a = 10;
$a+=5;$a-=10;
print "\n$a";