Tfe

Ongi etorri tfe-ren webgunera...

Old stuff/Perl/at/beta_tests/test_change_user/01.pl

(Deskargatu)

#!/usr/bin/perl -w

system("su $ARGV[0] -c \"$ARGV[1]\"");