File: test-msva

package info (click to toggle)
msva-perl 0.8.1-2
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 256 kB
  • sloc: perl: 1,507; sh: 94; makefile: 19
file content (17 lines) | stat: -rwxr-xr-x 506 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#!/bin/sh

# this script exists so that you can launch the msva perl scripts
# directly from your development environment without having to install
# anything.

# it appears to be necessary because of some weirdness in how
# HTTP::Server::Simple interacts with Net::Server -- otherwise, i
# wouldn't need to shuffle all these files around.

# Author: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
# Date: 2010-03-11 14:53:07-0500

dir=$(dirname "$0")
cmd="$1"
shift
exec perl -wT -I"$dir" "$dir"/"$cmd" "$@"