#!/usr/bin/sh
perl -e'$l=shift if $ARGV[0] =~ /#{3,}/;
        exec $^X, "-MSmart::Comments=$l", @ARGV;
        die $!
       '