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

my $Interface = 'bge1';
$Interface =~ s/[0-9]$/:$&/;
print $Interface . "\n";