#!/usr/bin/perl

use strict;

my %options;
$options{'v'} =~s/\/\.\.\.//;

my $optv_modem = $options{'v'} . "/modem/...";
print "\n$optv_modem\n";

my $optv_apps = $options{'v'} . "/apps/...";
print "\n$optv_apps\n";