#! /usr/local/bin/perl5 $variable = "some text"; print("\$variable = $variable"); print("\n"); $variable = 2; $variable = $variable +1; print("\$variable = $variable"); print("\n"); $variable = ($variable-1)/1.5; print("\$variable = $variable"); print("\n");