boucman

execve("/usr/bin/npm", ["npm", "install", "debug"], [/* 24 vars */]) = 0
brk(0)                                  = 0xa0000
uname({sys="Linux", node="varsomam33", ...}) = 0
access("/etc/ld.so.nohwcap", F_OK)      = -1 ENOENT (No such file or directory)
mmap2(NULL, 8192, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0xb6f0b000
access("/etc/ld.so.preload", R_OK)      = -1 ENOENT (No such file or directory)
open("/etc/ld.so.cache", O_RDONLY|O_CLOEXEC) = 3
fstat64(3, {st_mode=S_IFREG|0644, st_size=17693, ...}) = 0
mmap2(NULL, 17693, PROT_READ, MAP_PRIVATE, 3, 0) = 0xb6f06000
close(3)                                = 0

boucman

-- easy access variables
dt=require("darktable")
table = require "table"
debug = require "debug"
require "darktable.debug"

--dt.debug.debug = true
function test_fn(name,...)
	print("*****  "..name.." ****")
	params = {...}

boucman

dt = require "darktable"
debug = require "debug"
--introspect = require "introspection"
--introspect.debug = true
--introspect.introspect(dt)
--introspect.introspect(debug.getregistry(),"registry")
dt = require("darktable")
print("normal printf")
for k,v in pairs(dt) do
	print(k.." : "..tostring(v))

boucman

#!/usr/bin/perl
     
    use strict;
    use warnings;
    eval "require Git::Repository; require IPC::Run; 1" or die "Please do:  sudo apt-get install libgit-repository-perl graphviz libipc-run-perl    - Missing libraries";
    use Git::Repository;
    use IPC::Run qw( run );
    my $svg_filename = "plot.svg";
     
    if (!defined($ARGV[0]) ||  $ARGV[0] eq "-h" ||  $ARGV[0] eq "--help") {