13a14,16 > # Allow this to be specified. Otherwise it will be pulled from > # the get_set function. > $node = 0; 27,28c30,31 < execute_script [options] eventnode# full_path_to_sql_script_file < execute_script [options] -c SCRIPT eventnode# --- > execute_script [options] set# full_path_to_sql_script_file > execute_script [options] -c SCRIPT set# 53,54c56,59 < my ($node, $file) = @ARGV; < die $USAGE unless $node; --- > my ($set, $file) = @ARGV; > die $USAGE unless $set; > $set = get_set($set) or die "Non-existent set specified.\n"; > $node = $SET_ORIGIN unless $node; 79a85 > $slonik .= " set id = $set,\n";