#!/usr/local/bin/perl use v5.36; my$a=1/3;say$a;say$a*3;