#!/bin/sh perl -E "my$a=1/3;say$a;say$a*3"