$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";