#!/usr/bin/perl -w$a = 4;$b = 10;print "Our variables are ", $a, " and ", $b, "\n";$b = $a++;print "After incrementing, we have ", $a, " and ", $b, "\n";