34 lines
393 B
Perl
Executable File
34 lines
393 B
Perl
Executable File
#!/usr/bin/perl -w
|
|
|
|
#
|
|
# Customize an installed copy of Linux by running hooks, etc.
|
|
#
|
|
|
|
use strict;
|
|
|
|
|
|
#
|
|
# Parse arguments.
|
|
#
|
|
# We'll need at least:
|
|
#
|
|
# --installation = /tmp/3980fdf890
|
|
# --distro= { sid sarge etch centos4 gentoo .. etc }
|
|
#
|
|
#
|
|
|
|
#
|
|
# Check arguments:
|
|
#
|
|
# Distro hook directory must exist.
|
|
# if not abort.
|
|
#
|
|
|
|
#
|
|
# Run each relevent hook script.
|
|
#
|
|
|
|
#
|
|
# Exit cleanly
|
|
#
|