No. My laptop doesn't have TPM (at least there's no option in the BIOS to enable/disable and there's nothing in /sys/class/tpm/ ).
My desktop have, but not enabled: desktop$ cat /sys/class/tpm/tpm0/device/enabled 0 desktop$ Do you think it's because of that? With other applications i can reach same speed with SSL on both machines. Regards, David Santiago On Wed, 01 Jun 2016 19:36:06 +0100 Steve Pointer <spoin...@humdai.net> wrote: > Does your laptop have a TPM? > > > > On 1 June 2016 19:25:39 BST, David Emanuel da Costa Santiago > <deman...@gmail.com> wrote: > > > >Hi! > > > >I have a script that writes to a socket, but i noticed that the same > >script have diferent speeds on different machines. It's faster on my > >5 year laptop than on my desktop. > > > >I profiled the script on both machines and some functions are taking > >almost the double of the time! Example: > > > >on my laptop: > > > >Calls: 10631 > >Exclusive Time: 28.2s > >Inclusive Time: 28.2s > >Subroutine: Net::SSLeay::write_partial (xsub) > > > >On my desktop: > >Calls: 5057 > >Exclusive Time: 45.0s > >Inclusive Time: 45.0s > >Subroutine: Net::SSLeay::write_partial (xsub) > > > > > >Both machines have the same software version (OS, perl,..) and the > >internet connection is the same. The hardware is different. > > > >What puzzles me is that my desktop have better hardware (according > >to the benchmarks on the internet) than my old laptop. However i get > >way > >worse speeds on my desktop. > > > >On both machines, when the script is running the CPU is around 7%, > >and the RAM usage is between 50MB - 100MB. > > > >The question for one million dollar is "Why?". And how can i improve > >the performance of my desktop to reach the same speed as my laptop > >(considering that i have better hardware on my desktop)? If i > >recompile perl instead of using a binary package, will that make it > >even? > > > > > > > >Regards, > >David Santiago > > > >-- > >To unsubscribe, e-mail: beginners-unsubscr...@perl.org > >For additional commands, e-mail: beginners-h...@perl.org > >http://learn.perl.org/ > -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
