From b518cc2c00e024805c749da5e153f6fca5ca8c30 Mon Sep 17 00:00:00 2001 From: Nicolas Thill Date: Sat, 1 Sep 2007 15:20:33 +0000 Subject: [PATCH] add an abs2rel.pl helper script (returns a path relative to another) SVN-Revision: 8570 --- scripts/abs2rel.pl | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100755 scripts/abs2rel.pl diff --git a/scripts/abs2rel.pl b/scripts/abs2rel.pl new file mode 100755 index 0000000000..1bd9a14af1 --- /dev/null +++ b/scripts/abs2rel.pl @@ -0,0 +1,17 @@ +#!/usr/bin/perl +# +# Copyright (C) 2007 OpenWrt.org +# +# This is free software, licensed under the GNU General Public License v2. +# See /LICENSE for more information. +# +# $Id$ + +use strict; +require File::Spec; + +my $source = shift @ARGV; +my $target = shift @ARGV; +my $result = File::Spec->abs2rel($source, $target); + +print "$result\n";