A default `LOGIN.COM` to start with when working with OpenVMS

LOGIN.COM

$ LS :== "DIR"
$ LL :== "DIR/SIZE/DATE/OWNER"
$!
$ CD :== "SET DEFAULT"
$ DEFINE/PROCESS "~" SYS$LOGIN
$!
$ ADD_LOG_TO_FILE_OPERATIONS:
$!
$       BAC*KUP :=="BACKUP/LOG"
$       COPY    :=="COPY/LOG"
$       CP      :=="COPY/LOG"
$       DEL*ETE :=="DELETE/LOG"
$       RM      :=="DELETE/LOG"
$       PURGE   :=="PURGE/LOG"
$       MOVE    :=="RENAME/LOG"
$       MV      :=="RENAME/LOG"
$       REN*AME :=="RENAME/LOG"
$!
$ SET TERM/ANSI/INSERT
$
$! Dynamically set the prompt with hostname and username, removing spaces
$ NODENAME = F$EDIT(F$GETSYI("NODENAME"),"TRIM")     ! Trim extra spaces
$ USERNAME = F$EDIT(F$GETJPI("","USERNAME"),"TRIM")  ! Trim extra spaces
$ SET PROMPT="''NODENAME'_''USERNAME'> "
$!
$ NANO :=="EDIT"
$!
$! MAKE IT SO YOU CAN RUN REGULAR TCPIP COMMANDS (E.G. PING, NSLOOKUP, ETC)
$ @SYS$MANAGER:TCPIP$DEFINE_COMMANDS
$!
$ EXIT