chiark / gitweb /
hippotat: Convert an explicitly configured URL to ASCII.
[hippotat.git] / subst-sys-path
1 #!/usr/bin/perl -pi
2 next unless m{^#\@ };
3 my $ok = 1;
4 s{@(\w+)@}{ $ENV{$1} // ($ok=0, $&) }ge;
5 s{^#\@ }{} if $ok;