You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
8 lines
235 B
8 lines
235 B
#!/usr/bin/perl
|
|
$base = $ARGV[0];
|
|
$base =~ s!^\./!!;
|
|
$base =~ s/\"/\\\"/g;
|
|
$path = $base;
|
|
$path =~ s!/[^/]+$!!;
|
|
print "mkdir -p \"/var/lib/mythtv/music/$path\"\n";
|
|
print "ln -s \"/home/Music/$base\" \"/var/lib/mythtv/music/$base\"\n";
|
|
|