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

my ${variable} = "Motor";
print "${variable}rad\n"