[package] firewall: restore local port relocation ability from r26617
[openwrt.git] / scripts / abs2rel.pl
1 #!/usr/bin/env perl
2 #
3 # Copyright (C) 2007 OpenWrt.org
4 #
5 # This is free software, licensed under the GNU General Public License v2.
6 # See /LICENSE for more information.
7 #
8
9 use strict;
10 require File::Spec;
11
12 my $source = shift @ARGV;
13 my $target = shift @ARGV;
14 my $result = File::Spec->abs2rel($source, $target);
15
16 print "$result\n";
This page took 0.047074 seconds and 5 git commands to generate.