PAL.C.T MINI SHELL
# freebsd-lib.pl
# Functions for changing user details on FreeBSD
# change_details(realname, office, ophone, hphone, shell)
sub change_details
{
#&switch_to_remote_user();
$ENV{'EDITOR'} = "$module_root_directory/editor.pl";
$ENV{'EDITOR_REAL'} = $_[0];
$ENV{'EDITOR_OFFICE'} = $_[1];
$ENV{'EDITOR_OPHONE'} = $_[2];
$ENV{'EDITOR_HPHONE'} = $_[3];
$ENV{'EDITOR_SHELL'} = $_[4];
local $out = `chfn $remote_user 2>&1`;
return $? ? $out : undef;
}
�
y���~�or�5�J�={��E��e�u磝Qk��ᯘG{�?���+�]������ן�?w�M3X^��歌>{�7پ�K�>�o��n�\����j�y��R���g/�=��f�O��r�o��NV�v��~�Y+��NG�u���Ý����HW��y�w�[eQ�ʨ�S�b��>������>�}G�mx[o[<��{���Ϯ_��qF���vMIEND�B`�