#!/usr/local/bin/perl
use strict;
use warnings;

my $ bar = 123;
my $ foo = $bar | | "default value";
print $ foo;