| files >> /usr/libexec/usermin/cshrc/ |
| files >> //usr/libexec/usermin/cshrc/save_cshrc.cgi |
#!/usr/bin/perl
# save_cshrc.cgi
# Save the user's login script
require './cshrc-lib.pl';
&ReadParseMime();
$in{'cshrc'} =~ s/\r//g;
&open_tempfile(CSHRC, ">".$cshrc_files[$in{'idx'}]);
&print_tempfile(CSHRC, $in{'cshrc'});
&close_tempfile(CSHRC);
&redirect("/");
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`