If I understand you, perhaps you don’t need an array of zeroes; rather, you need a hash. The hash keys will be the values in the other array and the hash values will be the number of times the value exists in the other array: use strict; use warnings; my @other_array = (0,0,0,1,2,2,3,3,3,4); my %tallies; … Read more
Quick shell one-liner: perl -le ‘print scalar localtime 1357810480;’ Thu Jan 10 10:34:40 2013 Or, if you happen to have the timestamps in a file, one per line: perl -lne ‘print scalar localtime $_;’ <timestamps
You can just do it. { local @ARGV = qw<param1 param2 param3>; do ‘/home/buddy/myscript.pl’; } Prevents the overhead of loading in another copy of perl.
Please remember the rules of Optimization Club: The first rule of Optimization Club is, you do not Optimize. The second rule of Optimization Club is, you do not Optimize without measuring. If your app is running faster than the underlying transport protocol, the optimization is over. One factor at a time. No marketroids, no marketroid … Read more
I put your C++ function into header file as an inline function for testing. I was then able to construct a SWIG interface that does what you are looking for. It has two key parts. Firstly I wrote a typemap that will allow either a std::map, or a perl hash to be given as input … Read more
The standard way for telling what type of object you have is either ref or Scalar::Util::blessed. If you know the object is blessed, then they return the same information. my $class1 = blessed( $obj ); my $class2 = ref $obj; But ref will also return ‘HASH’ for unblessed hashes, while blessed refuses to play that … Read more
Writes to MongoDB currently aquire a global write lock, although collection level locking is hopefully coming soon. By using more threads you’re likely introducing more concurrency problems as the threads block eachother while they wait for the lock to be released. Indexes will also slow you down, to get the best insert performance it’s ideal … Read more
“Best” is, of course, a matter of taste. Rather than “best”, I’ll answer this as “what editor should I use for Perl if I don’t already have a strong preference for an editor?” I went on a short quest to answer this question for my students. What I recommend now is Atom. It’s free, open … Read more
To get a slice starting with an array reference, replace the array name with a block containing the array reference. I’ve used whitespace to spread out the parts, but it’s still the same thing: my @slice = @ array [1,3,2]; my @slice = @ { $aref } [1,3,2]; If the reference inside the block is … Read more
The character is “\xa0” (i.e. 160), which is the standard Unicode translation for . (That is, it’s Unicode’s non-breaking space.) You should be able to remove them with s/\xa0/ /g if you like.