The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/bin/bash

export PATH=/bin PERL6LIB=/lib6
export PUGS_PARROT_OPTS="-j"

pugs -w /welcome.p6
pugs

echo
echo "You may want to restart Pugs by entering"
echo "  pugs"
echo "on the command prompt."
PS1="[root@pugs] \w # " bash

echo
echo "Thanks for trying Pugs!"
echo "You can safely switch your computer off now."
echo "If you want to find out more about Pugs, visit http://www.pugscode.org/."
while :; do pugs -we 'sleep 86400'; done