Log mailing script

RouterOS Scripting
1 
/log print file=([/system identity get name] . "Log-" . [:pick [/system clock get date] 7 11] .
[:pick [/system clock get date] 0 3] . [:pick [/system clock get date] 4 6]); \
/tool e-mail send to=voorbeeld@domein.com subject=([/system identity get name] . " Log " . \
[/system clock get date]) file=([/system identity get name] . "Log-" . [:pick [/system clock get date] 7 11] . \
[:pick [/system clock get date] 0 3] . [:pick [/system clock get date] 4 6] . ".txt"); :delay 10; \
/file rem [/file find name=([/system identity get name] . "Log-" . [:pick [/system clock get date] 7 11] . \
[:pick [/system clock get date] 0 3] . [:pick [/system clock get date] 4 6] . ".txt")]; \
:log info ("System Log emailed at " . [/sys cl get time] . " " . [/sys cl get date])

In the past, this script worked very well.
It seems that all my scripts do not work anymore.
Has the code been changed?
Can I help someone with the correct code?

2

Not sure whats wrong with it, but it seems badly written.
It runs the same many times. Store time to a variable, then use it instead of getting time in same format many times.
It seems that a ** is missing for the first line.
Why use fulle syntax here:

[/system clock get date]

Then later shorten it:

[/sys cl get date]

But why send logs to email, use syslog and send it to an external server eks Splunk.
See my post here:
http://forum.mikrotik.com/t/using-splunk-to-analyse-mikrotik-logs/105668/1

This should do the same:

: local filename ([/system identity get name] . "Log-" . [:pick [/system clock get date] 7 11] . [:pick [/system clock get date] 0 3] . [:pick [/system clock get date] 4 6].".txt")
/log print file="$filename"
/tool e-mail send to="<your email here>" subject="$filename"  file="$filename" body="log files"
:delay 10s
/file rem "$filename"
: log info "System Log emailed at $filename"