sed "s/^X//" >'dbdump' <<'END_OF_FILE'
    X: #!/usr/bin/perl
    Xeval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
    X if $running_under_some_shell;
    X#!/usr/local/bin/perl