#!/usr/bin/perl -w use v5.14; my ($x, $y) = split ' ', <>; say $x + $y